Select Code to Download

http://lezar.org/path/to/script/myscript?where=someval

#!/usr/bin/perl -wT
use strict;
...
} else {
    # $where is not what we expect, so we have an error routine here;
}

use CGI::Carp qw( fatalsToBrowser );