if( $search !~ /\A ([A-Za-z0-9 ]+) \z/x ) { print "Error, can't run search\n"; }