Skip to main content
Code Golf

Return to Answer

The // after -F are unnneeded
Source Link
Ton Hospel
Ton Hospel
  • 14.9k
  • 1
  • 22
  • 45

Perl, 33>33 31 bytes

Includes +5+3 for -F// (cannot be combined with -e and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F//
$"=v9;say"@F@{[unpack'W*']}"

Output is not aesthetic if the text contains a tab or there is no final newline

Perl, 33 bytes

Includes +5 for -F// (cannot be combined with -e and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F//
$"=v9;say"@F@{[unpack'W*']}"

Output is not aesthetic if the text contains a tab or there is no final newline

Perl, >33 31 bytes

Includes +3 for -F (cannot be combined with -e and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F
$"=v9;say"@F@{[unpack'W*']}"

Output is not aesthetic if the text contains a tab or there is no final newline

deleted 3 characters in body
Source Link
Ton Hospel
Ton Hospel
  • 14.9k
  • 1
  • 22
  • 45

Perl, 3633 bytes

Includes +5 for -F// (cannot be combined with -e and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F//
$"=v9;say"@F@{[unpack'W*',$_][unpack'W*']}"

Output is not aesthetic if the text contains a tab or there is no final newline

Perl, 36 bytes

Includes +5 for -F// (cannot be combined with - and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F//
$"=v9;say"@F@{[unpack'W*',$_]}"

Output is not aesthetic if the text contains a tab or there is no final newline

Perl, 33 bytes

Includes +5 for -F// (cannot be combined with -e and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F//
$"=v9;say"@F@{[unpack'W*']}"

Output is not aesthetic if the text contains a tab or there is no final newline

Source Link
Ton Hospel
Ton Hospel
  • 14.9k
  • 1
  • 22
  • 45

Perl, 36 bytes

Includes +5 for -F// (cannot be combined with - and the code has ' too, so space and - are counted too).

Run with the input on STDIN or give one or more filenames as argument

perl -M5.010 asciidump.pl <<< "Hoi"

asciidump.pl

#!/usr/bin/perl -F//
$"=v9;say"@F@{[unpack'W*',$_]}"

Output is not aesthetic if the text contains a tab or there is no final newline