Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
$foo = "this is a \\ test";
print "Foo: ($foo)\n";
($bar) = $foo =~ /([\-])/;
print "Bar: ($bar)\n";

Select or download this
```
Foo: (this is a \ test)
Bar: ()
```