只需要申明标量环境就可以了，据个例子如下#!/usr/bin/perl -wuse strict;use warnings;my %hash=map {$_=>$_+1} (1..6);print scalar keys %hash;---------------------------输出结果6
