Perl学习笔记-标量数据

1. Perl没有整数，被当做双精度浮点数来处理。
2. 可以使用下划线来分隔数字，例如10_000_000_000。
3. 八进制0开头，十六进制0x，二进制0b。
4. 2 ** 3，表示2的三次方，所以你可以使用2 ** 32看看Java 的Int范围有多大。
5. 字符串就是字符的组合。有两种类型，一种是单引号，一种是双引号。跟PHP一样，双引号能对里面的变量或者转义字符进行解析。
6. 字符串连接是用点.不是用加号+连接。
7. 字符重复操作符用字幕x表示，例如 "fred" x 3表示，显示fredfredfred
8. Perl知道如何在字符串和数字之间转换，如果连接符是+表示成数字，如果连接符是点，表示成字符串。
9. perl -w可以显示warning信息。
10. 变量使用$开头的字符串。
11. 双引号字符串可以解析$变量的内容。
12. 对于没有复制的变量，如果是数字，使用0，如果是字符串，使用""。
13. Perl没有boolean类型，0, 空字符，undef都为false，其他都为true。
14. 用户输入使用<STDIN>来获取。例如 $line = <STDIN>
15. chomp可以把字符串的"\n"给过滤掉，所以使用<STDIN>的时候可能会用的，返回的数值表示过滤的字符个数。chomp($line)之后可以直接对$line进行操作。
16. <STDIN>可以返回undef。到了文件的结束的时候会返回undef。可以用函数define($line)来判断是否已经读到文件的结尾了。

答案：

$r1 = <STDIN>;
$r2 = <STDIN>;
chomp($r2);
print $r1 x $r2;
#print "abc\n" x $r2;

#$r1 = <STDIN>;
#chomp($r1);
#$r2 = <STDIN>;
#chomp($r2);
#print $r1 * $r2;

#$r = <STDIN>;
#chomp($r);
#if ($r < 0) {
#print 0;
#} else {
#print $r * 2 * 3.1415926;
#}