Re^2: Increaing a field size for a record

Thanks!! But this doesn't seam to be working for me. :( #!/usr/bin/perl open FILE, rij1.dat"; my @lines = <FILE>; foreach my $lin (@lines) { my $btw = substr($lin, 15, 0, "1" x 39); print "$btw"; } close FILE;

Comment on Re^2: Increaing a field size for a record

Replies are listed 'Best First'.
Re^3: Increaing a field size for a record by flexvault (Monsignor) on Oct 17, 2012 at 13:29 UTC
Thomas Kennll, That's not what I showed you, please note: `foreach my $lin (@lines) { substr($lin, 15, 0, "1" x 39); print "$lin\ +n"; }` [download] "Well done is better than well said." - Benjamin Franklin	[reply] [d/l]


Welcome to the Monastery
	PerlMonks