Piste: fsomers

Bac à sable fsomers

Table des matières

Bac à sable fsomers

Perl


## Timeline
if ( open( my $file, "<:encoding(UTF-8)", "$docdir" . "/history.txt" ) ) {

    my $i = 0;

    my @rows2 = ();
    my $row2  = [];

    my @lines = <$file>;
    close($file);

    shift @lines; #remove header row

    foreach (@lines) {
        my ( $epoch, $date, $desc, $tag ) = split(/\t/);
        if(!$desc && $date=~ /(?<=\d{4})\s+/) {
            ($date, $desc)= ($`, $');
        }
        push(
            @rows2,
            {
                date => $date,
                desc => $desc,
            }
        );
    }

    my $table2 = [];
    #foreach my $row2 (@rows2) {
    foreach  (@rows2) {
        push (@$row2, $_);
        push( @$table2, { row2 => $row2 } );
        $row2 = [];
    }

    $template->param( table2 => $table2 );
} else {
    $template->param( timeline_read_error => 1 );
}

output_html_with_http_headers $query, $cookie, $template->output;

DIff

@@ -1,5 +1,5 @@
 @font-face {
-    font-family: "NotoSans, sans-serif";
+    font-family: "NotoSans";
     font-style: normal;
     font-weight: 400;
     src: local("Noto Sans Regular"),
@@ -8,7 +8,7 @@
 }
 
 @font-face {
-    font-family: "NotoSans, sans-serif";
+    font-family: "NotoSans";
     font-style: bold;
     font-weight: 700;
     src: local("Noto Sans Bold"),
@@ -17,7 +17,7 @@
 }
 
 @font-face {
-    font-family: "NotoSans, sans-serif";
+    font-family: "NotoSans";
     font-style: italic;
     font-weight: 400;
     src: local("Noto Sans Italic"),
@@ -26,7 +26,7 @@
 }
 
 @font-face {
-    font-family: "NotoSans, sans-serif";
+    font-family: "NotoSans";
     font-style: italic;
     font-weight: 700;
     src: local("Noto Sans Bold Italic"),

playground/fsomers.txt · Dernière modification: 2021/04/30 10:27 de fsomers
CC Attribution-Share Alike 4.0 International Sauf mention contraire, le contenu de ce wiki est placé sous les termes de la licence suivante : CC Attribution-Share Alike 4.0 International