#!/usr/local/bin/perl
use strict;
use warnings;

# スカラー（単一の値：数値、文字列）変数: $

my $x = 10;
my $y = 10.7;
my $z = 123_235_235;

# 演算子
# =
# + - / * % **

my $xx = 10 * 10; # 100
my $yy = 10 % 3; # 1
my $zz = 2 ** 3; # 8

# ++ --
$x++; # 11
$x--; # 10

# +=
$x += 5; # $x = $x + 5

print $x;