Hi, Jenda ! - code snipped -
Grr, i was playing around with eval and bless, but forgot the KISS ! Thx, Jan -- cat /dev/world | perl -e "while (<>) {(/(^.*? \?) 42 \!/) && (print $1)}" errors->(c) _ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]