if( defined( $string ) and length( $string ) <= 1000 ) {
    print "It's a match!\n";
}