Help for this page

Select Code to Download

Select or download this

@words = qw (perl lerp lepp wombat);

...
    }
    print "$word matched!\n" if @bag == 0;
}

Select or download this

Testing perl...
perl matched!
...

Testing wombat...
wombat not matched