Help for this page
sub first_character_matches { return( ((lc shift) ^ (lc shift)) =~ /^\0/ ); }
1) poerbook:~% perl -wle 'print "yes" if ( ((lc shift) ^ (lc shift)) = +~ /^\0/ )' abc DBC 1) poerbook:~% perl -wle 'print "yes" if ( ((lc shift) ^ (lc shift)) = +~ /^\0/ )' abc ABC yes
www.com | www.net | www.org
No recent polls found