Help for this page

Select Code to Download


  1. or download this
    $_ = '  onn (bbcreccsnnl_output) !OUTPUT';
if ($_ =~ /^S\s+[-]*\d+[\.\d+]*\s+[-]*\d+[\.\d+]*\s*\(\s*IOPUT|OUTPUT\
+s*\)/i)
...
  {
    print "It does NOT match without case insensitive...\n";
  }
  2. or download this
    It matches with case insensitive...
It does NOT match without case insensitive...
  3. or download this
    ($_ =~ /\(\s*IOPUT|OUTPUT\s*\)/)