1, sub processFile { 
2.    my $dir=shift;  #@_ is implied!
3.    my $node=shift;
4,    my $someNumber=shift;