Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...
        print "Unmatched: $word\n";
    }
}

Select or download this

22:27 >perl 1501_SoPW.pl
Matched:   aple to: Apple
...
Unmatched: aqqple

22:27 >