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

my $age = 30;

print "Hello $age year old.\n";

1;