Skip to content

Instantly share code, notes, and snippets.

@danmaq
Last active January 27, 2018 07:24
Show Gist options
  • Save danmaq/cec7286c29874f952b13d3270305e918 to your computer and use it in GitHub Desktop.
Save danmaq/cec7286c29874f952b13d3270305e918 to your computer and use it in GitHub Desktop.
💡 Hello World without using literals.
#!/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; #############################################################################################
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment