my $data = @_; # data passed into function to be processed #### my $data = @_[0]; # data passed into function to be processed #### my ($data) = @_; # data passed into function to be processed #### my $data = shift; # data passed into function to be processed