💡 Hello World without using literals.

hello-world.pl

#!/usr/bin/perl                                                      -w
use IO::File; #####################< MY BODY WIDTH EQUALS THE ASCII CODE. >#########################
my $hello_txt = IO::File->new(__FILE__, O_RDONLY); ########################################################
foreach ($hello_txt->getlines()) ##########################################################################
{ ############################################################################################################
    my $length = length; ######
    my $character = chr $length; #####################################################
    print $character; ########################################################################################
} ###############################################################################################################
$hello_txt->close(); ######################################################################################
exit; #############################################################################################