Help for this page
use strict; my $newdata = '124|20030812|uiy|kjh|87'; ... } print DATAFILE $newdata,"\n"; close DATAFILE;