#!/bin/perl

# Scalar Variable
$x = 1;
$pi = 3.14;
$word = "CAT";

print "x is ",$x,"\n";
print "pi is ",$pi,"\n";
print "word is ",$word,"\n";

exit;