$perl -e 'print "4"x4; print "\n"'

4444

在perldoc perlop中记录了x运算符.这里二进制意味着一个运算符采用两个参数,而不是由位组成.

Binary “x” is the repetition operator. In scalar context or if the

left operand is not enclosed in parentheses,it returns a string consisting

of the left operand repeated the number of times specified by the right

operand. In list context,if the left operand is enclosed in parentheses

or is a list formed by “qw/STRING/“,it repeats the list. If the right

operand is zero or negative,it returns an empty string or an empty

list,depending on the context.

print ’-’ x 80; # print row of dashes

print "\t" x ($tab/8),’ ’ x ($tab%8); # tab over

@ones = (1) x 80; # a list of 80 1’s

@ones = (5) x @ones; # set all elements to 5

perl -e用于从命令行执行perl代码：

$perl --help

Usage: perl [switches] [--] [programfile] [arguments]

-e program one line of program (several -e's allowed,omit programfile)