sub _get_anyStr { my $prompt = shift; print "To not give any data, just hit return.\n"; print "$prompt: "; my $resp = ; chomp( $resp ); return _suckSpaces( $resp ); } #### "no" not allowed in expression at (eval 226)[/usr/share/perl/5.20/perl5db.pl:732] line 2, at end of line syntax error at (eval 226)[/usr/share/perl/5.20/perl5db.pl:732] line 2, near "need no stinking "