#!/usr/bin/perl

# playing a bit further...
# from CIS 180 - Perl - class 1
# last modified: 4-8-03 (added some comments)

print "Hello, world!\n";

# example of how you can use underscores within integer literals
# to enhance readability... but doesn't affect how the value
# is output by print

print 1_000_000;
print "\n";

# those underscores are OK in function calls, too

print cos 1_000_000;
print "\n";