Help for this page
@keys = qw(one two five); unshift @keys,'four'; ... } else { print "nope\n"; }
four one two five yep one two five two nope
if ( grep{ exists( $hash{$_} ) } @keys ) { print "yep\n"; } else { print "nope\n"; }
www.com | www.net | www.org
No recent polls found