in reply to Re: undef and "x" operator
in thread undef and "x" operator

Or $hic = ( split(/\*/,$_,7) )[5]; to split not more than necessary.
Update: Thanks to lidden for showing my mistake (had a 6 instead of 7).
s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e

Replies are listed 'Best First'.
Re^3: undef and "x" operator
by lidden (Curate) on Aug 09, 2006 at 22:05 UTC
    s/6/7/

    or the sixth field will contain too much.
[reply]
[d/l]

In Section Seekers of Perl Wisdom