#!/bin/perl

#use strict;
#use warnings;

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

$x = $x + 1;
$pi = $pi + 1;
$word = $word + 1;

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

exit;