in reply to perl -pl with next?


I'd use -n in this case. Otherwise you could use the slightly obscure goto LINE: 
    perl -ple 'goto LINE if /bala/; s/([^:]+)([^:]+)/$2$1/' file.txt f
+ile.txt

[download]

--
John.

In Section Seekers of Perl Wisdom