#!/usr/bin/perl

use strict "vars";
my $x = 10;
my $y = 20;
$a = $x * $y;
print $a;