if ($line =~ /^0.{9}(\t\d{1,20}){49}/)  {

##</code><code>##

if (/^0[0-9a-fA-F]{9}(?:\t[\d\.]{1,20}){49}/ {