Select Code to Download

sub qrany { $_ =~ $_[0] and return 1 for @_[ 1 .. $#_ ]; return 0 }
sub eqany { $_ eq $_[0] and return 1 for @_[ 1 .. $#_ ]; return 0 }