Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
{
     print "$names[ $_ - 1 ]\n";
}