Help for this page

Select Code to Download


  1. or download this
    $test = qq[some_text="asdfasdftest.123"];
# or, because you weren't interpolating:
$test = 'some_text="asdfasdftest.123"';
  2. or download this
    # untested.
@extensions = qw( 123 456 );
$match = join '|', @extensions;
if ( $test =~ /($match)$/ )
# etc