$ perl -wle 'print "newline is whitespace" if "\n" =~ m/\s/'
newline is whitespace