Calendar - for "REAL" programmers: Difference between revisions

→‎{{header|Perl 6}}: look Ma, no letters!
(→‎{{header|Perl 6}}: look Ma, no letters!)
Line 360:
`${E}${C}${H}${O} $PROGRAM | ${T}${R} A-Z ${A}-${Z} | ${P}${E}${R}${L}`;</lang>
Although, if we are abusing the backticks and other innocent programs, why not just: <lang Perl>$_=$ARGV[0]//1969;`\143\141\154 $_ >&2`</lang>
=={{header|Perl 6}}==
Uppercase is no challenge, who needs letters at all?
{{works with|rakudo|2011.07}}
<lang perl6>$_=["\0"..."~"];<
114 117 110 32 34 99 97 116 32 115 110 111 111 112 121 46 116
120 116 59 99 97 108 32 45 104 32 64 42 65 82 71 83 91 48 93 34
>."$_[99]$_[104]$_[114]$_[115]"()."$_[101]$_[118]$_[97]$_[108]"()</lang>
 
=={{header|PicoLisp}}==
Anonymous user