#!/usr/bin/perl
##############
# class demo on 9/8/04
#
##############
use strict;
use warnings;

my $name = "Jim";
print " Hi there, $name. \n";