sub new {                  # @_  = ('Music', 5)
    my $class = shift;     # @_  = (5)
    my $number1 = @_;      # $number1 = 1  - array in scalar context returns it's size! 
    my $number2 = &add_numbers; #  here you call sub add_numbers!