[MacPerl] Script works with debugger but .....

[jmanley@metronet.com (Jim Manley)]

-----BEGIN PGP SIGNED MESSAGE-----

I'm working through the perl scripts in the O'Reilly
"Learning Perl" book (the llama book) and I've encountered
a strange problem with the script on pgs 20 - 21.  (I've
reproduced the part I'm having trouble with below.)

print "What is your name? ";
$name = <STDIN>;
chop($name);
if ($name =~ /^jim\b/i) {
    print "Hello, Jim! How good of you to be here!\n";
} else {

When I run the script without the debugger, it executes the first
print statement properly.  When I enter "Jim", the script exits
but does not execute the second print statement.

If I run the script with the debugger, it runs as expected.

Anyone have any clues?

Jim Manley
jmanley@metronet.com
http://www.metronet.com/~jmanley
Finger for PGP Public Key
-----BEGIN PGP SIGNATURE-----
Version: 2.6.2

iQCVAwUBMQrxpSvYMV4IyPatAQEB1QP/X73hwsOp/SiYQvvmnlZXKF8E6J7I+yE+
S+pqulpDFgcJ/p0JGgk8aJFz4md5WXVnI8aK6/NU+q1dC/d0tgEA5hX/6tG+G0Ef
CTIkI2KGwKefNUI8NTWVH7SKoZESJ1sviE8gISn4gTcZ+7mHmyZt048Ion75bhnX
BQN7KJ9fvcE=
=Tkrm
-----END PGP SIGNATURE-----