if ($opt_l) {
    print "Option found: l\n";
    print "  with value: $opt_l\n";
} else {
    print "You must specify -l\n";
    exit 1;
}