in reply to using split without $junk

Just ignore it...

$string = 'keep|throw'; my( $keep ) = split( /\|/, $string) ; print $keep;

gives:

keep

--
"To err is human, but to really foul things up you need a computer." --Paul Ehrlich