Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
Simple Perl OOP Hello World Example
package HelloWorld;
sub new
my $class = shift;
my $self = { };
bless $self, $class;
return $self;
sub print
print "Hello World!\n";
package main;
$hw = new HelloWorld();
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment