Checkout perldoc -q single. Looks like you may want to use
(which IIRC belive equates to Ctrl X).
I can't install this module at the moment (Im at work), but look at the sample code from perldoc -q single which should point you in the right direction.
Hope this helps.