Select Code to Download

substr($_,279) =~ s/$regex/$substitute{$1}/g;

substr($_,279) =~ s/$regex/$substitute{$1}/g
   unless length < 279;

{ no warnings; substr($_,279) =~ s/$regex/$substitute{$1}/g; }