Calendar - for "REAL" programmers: Difference between revisions
Content added Content deleted
(→{{header|Perl 6}}: look Ma, no letters!) |
|||
Line 360: | Line 360: | ||
`${E}${C}${H}${O} $PROGRAM | ${T}${R} A-Z ${A}-${Z} | ${P}${E}${R}${L}`;</lang> |
`${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> |
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}}== |
=={{header|PicoLisp}}== |