Scalar Variables in Perl

#!/usr/bin/perl
$classname="CGI Programming 101";
print "Hello there what is your name?\n";
$you = <STDIN>;
chomp($you);
print "Hello, $you. Welcome to $classname. \n";