Help for this page

Select Code to Download


  1. or download this
      my @data= qw( 953-FMT-FMT 954-FMT-FMT BLOGO93-FMT-FMT 955-FMT-FMT
    BOXSTART2-FMT-FMT BOXEND2-FMT-FMT 956-FMT-FMT 413-FMT-FMT
...
      $data{$sort}= $data;
  }
  print join( "\n", @data{ sort keys %data } ), "\n";
  2. or download this
    393-FMT-FMT
394-FMT-FMT
...
BOXEND2-FMT-FMT
BOXSTART2-FMT-FMT
DATE1-FMT-FMT
  3. or download this
      my @data= qw( 953-FMT-FMT 954-FMT-FMT BLOGO93-FMT-FMT 955-FMT-FMT
    BOXSTART2-FMT-FMT BOXEND2-FMT-FMT 956-FMT-FMT 413-FMT-FMT
...
      $data{$sort}= $data;
  }
  print join( "\n", @data{ sort keys %data } ), "\n";