Help for this page

Select Code to Download


  1. or download this
    while( $string =~ m/(SUMMARY.+?DESCRIPTION)/ig ) {
    print "Summary: $1\n"
}