Perlを思い出そう

my $x = 10;
my $y = 10.75;
my $z = 12_2425_241;

my $xx = 10 * 10;
my $yy = 10 % 3;
my $zz = 2 ** 3;

$x++;
$x--;

$x += 5;

my $a = "he\tllo"; # 特殊文字(\n, \t)が使える、変数展開がされる
my $b = 'he\tllo';

print $a;
print $b;

hellohellovagrant@vagrant-ubuntu-trusty-64:~/app$ perl hello.pl
he llohe\tllo

こうも書ける。

my $name = "tom";
my $a = "hello, $name\n"; # 特殊文字(\n, \t)が使える、変数展開がされる
my $b = 'hello';

print $a;
print $b;

# . x 文字の連結

配列変数

my @sales = (150, 200, 300);
my @colors = ('red', 'green');
my @mixed = (150, 'red', 1.5);

print @sales;

my @inc = (1..100);

print @inc;

配列の読み出し

my @sales = (300, 150, 200);

print $sales[1];

my @sales = (300, 150, 200);

print @sales[0..2];