sub func { my ( $str, $desktop_info, $files ) = @_; #sref, href, aref ... } #### sub func { my ( $str->$, $desktop_info->%, $files->@ ) = @_; ... }