in reply to pattern matching

TMTOWTDI: you could use chomp instead:
{
    local $/ = "^@";
    chomp $str;
}

[download]

Replies are listed 'Best First'.
Re^2: pattern matching
by himanshu.padmanabhi (Acolyte) on Mar 04, 2009 at 15:01 UTC
    Thank you very much. You already given me this solution. It is working well. I should have try it that time only.:(
[reply]

In Section Seekers of Perl Wisdom