my @unpacking_list = values %map_function; print " ".@unpacking_list; 输出是3 把 @unpacking_list 当做一个数 输出了

　　  my %map_function = (
     88     "OK_func" => "open_statement",
     89     "package_VAR" => "positional",
     90     "split_func" => "prototypes",
     91 );
     92 my @substr = keys %map_function;
     93 my @unpacking_list = values %map_function;
     94 print @substr;
     95 print " ".@unpacking_list;

print " ".@unpacking_list;     输出是3   把 @unpacking_list 当做一个数  输出了

3