perl -le 'my $str = "perlmonks"; print "yep" if length $str == 9'
yep