use strict; use warnings; use Data::Dumper; my @arr1 = < abc def ghi f* >; my @arr2 = qw( abc def ghi f* ); my @arr3 = glob('abc def ghi z*'); print Dumper(\@arr1); print Dumper(\@arr2); print Dumper(\@arr3); __DATA__ $VAR1 = [ 'abc', 'def', 'ghi', 'file1.txt', 'file2.txt' ]; $VAR1 = [ 'abc', 'def', 'ghi', 'f*' ]; $VAR1 = [ 'abc', 'def', 'ghi' ];