use strict; use warnings; my $num = 10; print $num;