if ($buffer =~ /^30582/)
{
  print "nothing to be printed"
}