Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict; 
...
for my $tag (sort keys %data) {
    print "$tag: $data{$tag}\n";
}
  2. or download this
    BEGIN_TAG
X1 test test test
...
X3 hi hi hi hi hi hi 
hi hi hi hi 
hi hi
  3. or download this
    X1: test test test
test test test NEWLINE tes test test
...
no no no no no  NEWLINE nono non no no NEWLINE  nononono no no  no
X3: yes yes yes
hi hi hi hi hi hi  NEWLINE hi hi hi hi  NEWLINE hi hi