Help for this page

Select Code to Download


  1. or download this
    
VIR19;VIR20;VIR;B744;
...
AL34BC;AL34AC;VIR;B744;
AL34BC;ADH00A;VIR;B744;
AL34BC;ADH01A;VIR;B744;
  2. or download this
    AL34BC;AL34AC;VIR;B744;
VIR19;VIR20;VIR;B744;
  3. or download this
    AL34BC;AL34BC;VIR;B744; (because they are the same name)
VIR19;VIR21;VIR;B744; (because the names are too far)
  4. or download this
    
#!/usr/bin/perl
...
close INFILE_1;
close OUTFILE;
  5. or download this
        print STDOUT "le item est $item\n";
         if ($item eq $decrement{ $item_DATA } ) { 
...
        elsif ($item eq $increment{$item_DATA } ) {
             print OUTFILE "$item;$item_DATA\n";