Elegant exit on the console

[BP]

Hi,

I'm a relatively inexperienced perl (in the form of
ActivePerl on Windows 98 SE) user who wonders how to
most elegantly exit a program from the console.
Ideally I would want the program to exit when the
user hits the escape key.  I have figured out that
I can nearly simulate this with
        if($_  eq "<escape char>"){die("You exited!\n")}
        # if you type escape and return
but then I have to type escape AND return...

TIA,

/BP 8^)
--
  B.Philip Jonsson mailto:[EMAIL PROTECTED] (delete X)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
"Truth, Sir, is a cow which will give [skeptics] no more milk,
and so they are gone to milk the bull."
                                    -- Sam. Johnson (no rel. ;)

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]