sub getSongs {
        my $dir = @_;  # INCORRECT: assigns @_ in SCALAR context

        ...

    }  # end of subroutine definition