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>