Please can you make the byte positions as also variables
which can be passed along with file name.

Coz I need to do it several times over many files.

Thanks in advance.

---------- Post updated at 03:08 PM ---------- Previous update was at 02:56 PM ----------

Hello ,

I ran the below code :

Code:

 
#!/usr/bin/perl
while(<>)  {
    $txt .= $_;
    last if ( scalar split //, $txt ) >= ( 72551  );
}
$txt =~ s/(.{72545})(.{6})/\2/s;
print $txt;

and got the below message when I ran it like
perl byte_pos_script.pl file_name

Code:

Quantifier in {,} bigger than 32766 before HERE mark in regex m/(.{ << HERE 72545})(.{6})/

Please help.