The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

#!/usr/bin/perl
use strict;
use warnings;

my $name;

print "Hello $name\n";
my $x = "2x";
print 3+$x, "\n";

print "done\n";