Jeg er ved at lære PERL men er stødt ind på nogle problemer. er der én der vil hlælpe?

Jeg skal prøve at løse en opgave men kan desværre ikke. Opgave formuleringen ser således ud:

1. Consider the enclosed PERL program, webcollect4.pl
  a. Describe exatctly what command line arguments
      webcollect4.pl takes.
  b. The third line of the program is this:
     
      if (!$level) {exit;}

    Explain the function of this line.


Programmet som skal bruges til svarerne ser således ud. Programmet fortsætter men det er kun begyndelsen af det, jeg har skrevet, da jeg tror, det er nok til at kunne besvare spørgsmål a og b:

#!/usr/bin/perl     
#webcollect4.pl
#
$location = $ARGV[0];
$level = $ARGV[1];
if (!$level) {exit;}
print STDERR \"*** page: $location level $leve1\\n\";

@contents = `/usr/bin/lynx -source $location`;
foreach $line (@contents) {
    $newloc = \"\";