my $debug = 0;

getopt('dlv');

if ($opt_d) {
    $debug = 1;
}

if ($opt_l) {
    # do something with arg l
}

if ($opt_v) {
    # do something with arg v
}