in reply to split $c

Another option, if ':' doesn't appear in the terms of the '|' delimited files, or '|' in the terms of the ':' files, and avoids use of GetOpts:
@columns = split /\:|\|/;

-----------------------------------------------------
Dr. Michael K. Neylon - mneylon-pm@masemware.com || "You've left the lens cap of your mind on again, Pinky" - The Brain
"I can see my house from here!"
It's not what you know, but knowing how to find it if you don't know that's important