my $content = get($url);
print $content =~ /^(.*abc.*\n)/m;