Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
        last if $p < 0;
        print "Found $str at position $p\n";
    }