Hi
Please help if you can.
Kind Regards
Stuart Clark
 
 
How do I make the number between the "a" and the "z"  take up 10
positions within the line by adding zero's in front. 
The numbers between the "a" and "z" are not always the same length but
they always start at the 24th position in the line.
 
# start of file test
30000034364717283459322a15.32zM    042001H
30000045434551648534245a243.56zM    040532H
30000053232540927543293a2.45zM    040332H
# end of file test
 
 
 
open (IN,"test")              ||  die "Could not open the test file\n";
open (OUT,">result")      || die "Error could not create the output
file\n";
 
while (<IN>) {
            
s/a.*?z/WHAT GOES HERE?/;   
            
            
print OUT $_;
}
 
close(IN)                       || die "Error cannot close test file\n";
close(OUT)                    || die "Error cannot close output file\n";
 
 
 
# output file must look like this
3000003436471728345932200000015.32M    042001H
3000004543455164853424500000243.56M    040532H
3000005323254092754329300000002.45M    040332H
 
 


Reply via email to