Help for this page
perl -e 'my $x = "abcdefg" =~ /(cd)/; print "$x\n";'
perl -e 'my ($x) = "abcdefg" =~ /(cd)/; print "$x\n";'
my($this, $that) = $string =~ /abc(def).+?(pq)$/;
Non-existent; I don't have TV
Non-existent; my TV doesn't have/need a remote
Under my control; I watch alone
Under the control of whoever shouts loudest
Under the control of whoever gets it first
One of many, and the TV has a mind of its own
Results (490 votes),