Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl
use strict;
...
if ($x =~ /b/) { print "y\n" } else { print "n\n" }
if ($x =~ 'b') { print "y\n" } else { print "n\n" }
if ($x =~ ?b?) { print "y\n" } else { print "n\n" }

Select or download this

$ junk
Use of ?PATTERN? without explicit operator is deprecated at ./junk lin
+e 7.
y
y
y