http://www.perlmonks.org?node_id=999408


in reply to Re: Increaing a field size for a record
in thread 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]

In Section Seekers of Perl Wisdom