Hi John,

You forgot at least a backslash,

$string =~ s/\|+/\|/g;

Should do the job.

HTH
George


_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to