Oops,
"(" was in the wrong place.
$filelist =~
s/^(.*)((\s([0-9]+\.[0-9\.]*|NONE)\,.*,([0-9]+\.[0-9\.]*|NONE))+)$/$2/;Jerry _______________________________________________ Info-cvs mailing list [EMAIL PROTECTED] http://mail.gnu.org/mailman/listinfo/info-cvs
