Select Code to Download

#! perl -slw
use strict;
...
cat ball stone
monkey iron cat zoo

C:\test>junk4
cat stone 1
...
cat iron 1
iron zoo 1
ball stone 1