>perl
use strict;
use warnings;
my $J='Just', my $A='Another', my $P='Perl', my $H='Hacker';
print "$J $A $P $H";
__END__
Just Another Perl Hacker