Help for this page
use asdf qw( . . . );
package asdf; require Exporter; ... my $class = shift; my @list = @_ if @_; # @list contains the splitted string
split(' ', q/STRING/);