use warnings;
use strict;

$_ ='';

# find empty lines.
print "  - empty line\n" if /^$/;

# find lines that contain one or more whitespace characters.
print "  - contains whitespace 1\n" if m/^\s+$/ =~ $_;   ## line 10
print "  - contains whitespace 2\n" if m/^\s+$/;