What makes you think you don't know?

$ perl
my $im1 = 30;
my $cl2 = 20;
my $answer = ($im1/$cl2);
print $answer
^D
1.5
[download]