Le Bac A Sable

Ici vous pouvez tester toutes les fonctionnalités du wiki sans rien casser d'important

documentation sur la syntaxe du wiki : Guide de la mise en page

Allez Y

test syntaxe highlighting:

#!/usr/local/bin/perl
 
 
 
open (FICIN,"<-") or die "pb ouverture stdin";
 
 
while (<FICIN>)
  {
    chomp;
    $ligne = $_;
    @l = split (" ",$ligne);
    $inode = $l[0];
    $nomfic = $l[1];
 
    push @{$tabinode{$inode}}, $nomfic ;
 
  }
 
 
foreach $inode (keys %tabinode) {
  if (@{$tabinode{$inode}} >= 2)
    {
      print "LNK : $inode : @{$tabinode{$inode}}\n";
    } else {
      print "$inode : @{$tabinode{$inode}}\n";
    }
}