Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
                        'rew'
                      ]
        };
  2. or download this
    __DATA__

...
Anand,3,4,4,4,ert
seetha,1,2,3,4,rew
Anand,2,2,2,2,tre
  3. or download this
    #!/usr/bin/perl
use strict;
...
                   'rew'
                 ]
        };
  4. or download this
    my %HoA;
while (<>) {
...
} continue {
    close ARGV if eof;
}
  5. or download this
    my %HoA;
while (<>) {
...
} continue {
    close ARGV if eof;
}
  6. or download this
    my %HoA;
while (<>) {
...
} continue {
    close ARGV if eof;
}