use LWP::Simple;
my $page = get("http://www.google.de");

if ( ( my $position = index $page, "font-family" ) >= 0 ) {
    print "Found at $position.\n";
}