Re^2: Parsing delimited file

{
  local $/, $_ = <DATA>;
  s/\|$//mg && print;
}


__DATA__
AAAA|Q|dfadfsfaf|S|asfddsfasfdasdfaf|werwqr345435|
BBBB|Q|ccccccccc|S|ddddddddddddddddd|eeeeee111111|
FFFF|Q|ggggggggg|S|hhhhhhhhhhhhhhhhh|iiiiii222222|
[download]

means the same, but probably the question means sm.th. else...

Comment on Re^2: Parsing delimited file Download Code

Replies are listed 'Best First'.
Re^3: Parsing delimited file by AnomalousMonk (Archbishop) on Jan 18, 2009 at 20:12 UTC
Not quite sure what you're driving at here. Output: `Parentheses missing around "local" list at ... AAAA\|Q\|dfadfsfaf\|S\|asfddsfasfdasdfaf\|werwqr345435 BBBB\|Q\|ccccccccc\|S\|ddddddddddddddddd\|eeeeee111111 FFFF\|Q\|ggggggggg\|S\|hhhhhhhhhhhhhhhhh\|iiiiii222222` [download]	[reply] [d/l]
Re^4: Parsing delimited file by ravula1 (Initiate) on Jan 19, 2009 at 02:42 UTC
Thank you all for your input. I will tweak the code little bit to suit for my needs	[reply]