Select Code to Download

$ perl -MO=Deparse,-p <<'EOT'
if ($answer eq "add" || "a") {
...
    exit(0);
}
- syntax OK