my ($substring) = $tmp =~ /\n(.*)$/;