Select Code to Download

print "$_ ", /(.*)(?{$countSpaces->()})/ ? "has 1 or no spaces\n" : "h
+as more than one space\n";

this line has more than one space
 has more than one space
...
 has more than one space
therearenospaceshere
 has 1 or no spaces