Help for this page

Select Code to Download


  1. or download this
            if ( /<title>(.*?)<\/title>/si )
        {
           print "Title = $1\n" unless $seen{$1}++;
        }
  2. or download this
        $seen{$1}++;
    if ( ! $seen{$1} ) {
        print "Title = $1\n";
    }
  3. or download this
        <title>This is a very
       Long Title</title>