Help for this page

Select Code to Download

Select or download this

if ($a =~ /'/) {....}
if (index ($a, "'") >= 0) {....}
if (split ($a, "'", -1) >= 2) {....}
if ($a =~ y/'/'/) {....}

Select or download this
```
 $a = "A\'\'Bcd"
```