in reply to Re^2: Arguments to substitution question
in thread Arguments to substitution question

$_ = "clrf__pbssCOMRAM&(0+255),c";
s/(.*\&).*(\,c)/$1$2/;
print $_;

[download]

ofcourse i saw this ques answered but may be you can use code this way too :p

Replies are listed 'Best First'.
Re^4: Arguments to substitution question
by ramachandrajr (Novice) on Sep 12, 2015 at 10:57 UTC 
    $_ = "clrf__pbssCOMRAM&(0+255),c";

s/(.*)\&.*(\,c)/$1$2/;

print $_;

    [download]

    really sorry abt the previous code there was a mistake

[reply]
[d/l]

In Section Seekers of Perl Wisdom