# scalar variables
$pi = 3.1415;
undef $pi; # undefine variable
$i += 1;
++$i; # auto increment
$i--;
$line .= "\n";
$val ||= "Default";
chop( $line = <STDIN>); # remove "\n"
$mode = 0755; # octal
$mask = 0xff40;
scalar( @days); # type cast
# references
$rs = \186282.42; # reference to a constant scalar
$rs = \$foo; # reference to a scalar
$bar = $$rs; # dereference
$bar = ${$rs}; # using a block which returns a reference
# Querying a reference
$a = 10;
$ra = \$a;
print ref( $ra);
Reserving some space for a scalar variable:
$i = " " x 320; print " Length " . length( $i) . "\n";