Help for this page
#!/usr/bin/perl -l ... print for @finds; print "-----"; print scalar reverse for reverse @finds2;
dog 789 cat dog dog bird cat ... dog 789 cat dog bird cat dog frog cat