my ($searchfield) = $line =~ /^'([^']*)/;