This works with Linux (at least Red Hat), and Windows (with a warning message which you can ignore). Run it on either system with the command:
perl vocal.pl.
The displayed version does NOT have code tags around it; as it renders very badly (at least in Firefox). Instead, the code tags version is at the end.
You will need the module LWP::Simple to run this.
Finally, it may not run in Windows, based on the file associations which are setup. I don't want to spoil the surprise, but if it doesn't do anything on Windows, you may have to read the following spoiler:
Associate files with extension '.ogg' with a sound-playing program, such as Winamp.
|
($,='use###################MEL!;,,,;vlEM##MML!;;,;;!vLlLLLL$FEMM##MMMMMMMM#MMM
LWvF#####################MFl!;;;;;!!!$MM##MEl;;,,,;;;!lllLLLLFEM###MMMMMMM##M
P::;!LM##################ME$v!;;;;;;;;!LM###MFL!;,,,,,;;;;!llLLLL$EM###MMMMM##
Sim;vEM############MMMME$lv!;;,,;;,;;v$M###MELv!!;;!!!!!!;;;!vllLlLFM####MMM##
plev$MM##########MF$FFF$$LLlv!;;;;;;!l$EMMF$lvvvlllLLLLLllvv!!!!vvvl$M####MMMM
;$sFEMM####M##ME$Lllllvvvlllvvv!!!;;;;!vvvvv!!!!!vvv!!!!!!!v!!!!!!!!vLE#######
="sFEFE####$LLLlvvv!!!!!!!!!!!!!!!;;,,,,,,;;;;;;;;!!!!!!!;;;;;;;;;;;!!LM######
.oglFFFM###Elvvvv!!vlL$FFFF$Lvv!!!!;,,,,,,,,,,;;!!lL$FFFF$Llv!;;;;;;;;;!lE####
g";LFL$M###$vv!vvvl$F$LE#MMMMELvvv!;;,.,..,,,;;!vLlLMMMMEE$LLlv!;;;;;;;;!LE###
$u=F$l$M##Ml!!!vvlL$Lv!lEMMMFllvvv!!;,....,,;;;;lv;;LEMMFL!vllv!;;;;;;;;;!LM##
"htFLlF###Ev!!!!vvvvvv!!vvvv!!!!!v!;;,....,,,;,,;;;;;!vv!;;;;;;;;;,,,,;;;;!$##
tp:lLM###Fv!!!!!!!;;;;,;;;;;;;!!!;;,,.....,,,,,,,,;;;,,,,.,,,,,,,,,,,;;;;;vE##
//wlFM###Fv!!!!!;;;,,,,,,,,,,;;;;;,,.......,,,,..,,,,,,......,,,,,,,,,;;;;!$##
ebplLE####Fv!!!!;;;,,,,,,,,,,,;;;;;,,............................,,,,,,;;;;!LM
ageLF#####Ev!!;;;;,,,,,,....,,,;;;;,,.....,,,,....................,,,,,;;;!!$#
s.cFM#####Mv!!;;;,,,,,.......,;;!;,,..`...,,,,,....```````````.....,,,,;;!!vF#
har#######l!;;;;,,,.........,;;;,,...`......,,,..``````````````...,,,;;;!vlE##
ter#######L!!;;,,,,........,,;,,!!;,,,,,!!;..,,...`````````````...,,,;;;!vLM##
.ne#######Fv!;;;,,........,,,;;!l$l!;;;!lLl;,,,.....`````````....,,,;;;!vv$###
t/j########Ml!;;;,,,,....,,,,,,;;;;;;;;;;;;;,,,..................,,,,;;;!vlE##
yno#########Lv!;;,,,,,,,,,;;;;,,,;;,..,,.,,........,,,........,,,,,,;;;;!v$M##
rto#########Ev!;;;;,,,,;!!!!;;;;;;;,,,,,,,,,,,,,..,,;;;;,,,,,,,,,,;;;;;!vLM###
n/$##########l!!!;;;;;;;!!!!!!!!;;!;;;,;;;;;,,,,,,,,;;!!;;,,,,,,,;,,;;;!lE####
s";##########Ev!!;;;;,;;!!!vvvvvvvvv!!!!!!!!!!!!;!!!;;;,,,,,,,,,,,,,;;!v$#####
get###########$!!!;;;;,,;;!vlLLLlllvvvvvv!!!!vvvllvv!;,,.....,,,,,,,;!vL######
sto############L!!;;;;,,,;;;!!vvv!!;;,;;,,,,;;;;;;,,,,,.....,,,,,,,;;vL#######
re$############$v!;;;;,,;;;;;!!!;;;;;;,;;,,,,,,,,,,,,,,,.,,,,,,,;;!vLM########
u,$#############Fl!!;;;;;;;;;;;;;;,,,,,,,,,.....,,,,,,,,,,,,,,,;;!vLF#########
s;`##############M$v!!;;;;;;;;;;;,,,,..........,,,,,,,,,,,,,,;;!vlL$E#########
$s`################M$l!!;;;;;;;!;;,,....``....,,,,,,,,,,,,;;;!vlllL$M#########
;`p####################FLv!!!;;;;;;,,..........,,,,,,,,,;;;!vvvvvllLF#########
lay######################ELlv!!!;;;,,..........,,,,,;;;!!vvvvvvvvvlLF#########
$s#######################F$Lllv!;;,,,,......,,,,,;;!!vvvvv!!!!!vvlLE#########
`#########################E$LLlllvv!;;,,,,,,,;;!!!vvvvv!!!;!;;!!vvl$E#########
##########################MFLlllvvlvvvvvvvvvvvvvvvvv!!!;;;;;;;!!!vl$M#########
##########################ME$Llvvvvvvvvvvvvvvvvv!!!;;;;;;;;;;;;!vlLFM#########
###########################E$Lllvvvvv!!!!!!!!!!;;;;;;;;;;;;;;;!vlL$EM#########
#########################MME$llvvvvv!!!!!!!!!;;;;;;;;;;;;;;;!!vllL$FM#########
########################MEME$lvvv!!v!!!!!!!;;;;;;;;;;;;;;;;!!!vllL$EM#########
######################MEFFMF$lvv!!!!!!!!!!;;;;;;;;;;;;;;;;;!!vvvl$FE##########
####################EFFF$EF$Llvv!!!!!;;!!!!!!;;;;;;;;;;;;;;!!!vvL$EM##########
##################MMEEFEE$LLlvv!!!!!;;;;;;;;;;;;;;;;;;;;;;!!!!vvLEM###########
#############MMF$LL$FF$$Llvvvvv!!!;;;;;,,,,;;;;;;;;;;;;;;;;;;!!vLEMM##########
#####MMMMMMMFL!,;;!vvvv!!!!!!!!;;;;;,,,,,,,,,,,,,,,,,,,;;;;;;;;!vl$$FFEEMM####
###F$LlLL$FL;;,```.,;!!!!!!;;;;;;;,,,,,,..........,,,,,,,,,,,,,;!!vllllvlFM###
###vvlL$$$v;,.` ``.,,;;;;;;,,,,,,,,.......`````...........,,;;!!!,...,LEM#
###,,```` ``.,,;,,,,,,,...`.`')=~s/(...).+\n/$1/gx;$,=~s:@::g;eval$,
###,,,,,....```````````````````..,,,.`` . ; japh by liverpole
###.,....````````````````.....``` ````````
##``.....````````````..````
##``````````````````````
## ` ``` `!v` `!v`
## `` ,vllvv!!v!` !L` ,l;
## ., ;ll, .lv .l! ,L; .Lv
## ;l` ;LLl` ;v `vl` `lv` `;$l`
## ;L, v$LLv` ;l. `,Lv `v$llvvvvLL,
#` `l! `ll.,;; .lLlvvv!, ,L! .l!
#` ;l` `l; `!. `vl` .L! `vv`
#` ;l. `L, ;v` ;l` `vl ;l.
#` `l; .L;``.vL! .l, ,l` `;`
#`` `v! ,$L;,,.;l, `v; ``
#`` .;` ``!L, ,L, `,, `
#`` `,;!!!;,`
#``
Here's the version with code tags:
($,='use###################MEL!;,,,;vlEM##MML!;;,;;!vLlLLLL$FEMM##MMMM
+MMMM#MMM
LWvF#####################MFl!;;;;;!!!$MM##MEl;;,,,;;;!lllLLLLFEM###MM
+MMMMM##M
P::;!LM##################ME$v!;;;;;;;;!LM###MFL!;,,,,,;;;;!llLLLL$EM##
+#MMMMM##
Sim;vEM############MMMME$lv!;;,,;;,;;v$M###MELv!!;;!!!!!!;;;!vllLlLFM#
+###MMM##
plev$MM##########MF$FFF$$LLlv!;;;;;;!l$EMMF$lvvvlllLLLLLllvv!!!!vvvl$M
+####MMMM
;$sFEMM####M##ME$Lllllvvvlllvvv!!!;;;;!vvvvv!!!!!vvv!!!!!!!v!!!!!!!!vL
+E#######
="sFEFE####$LLLlvvv!!!!!!!!!!!!!!!;;,,,,,,;;;;;;;;!!!!!!!;;;;;;;;;;;!!
+LM######
.oglFFFM###Elvvvv!!vlL$FFFF$Lvv!!!!;,,,,,,,,,,;;!!lL$FFFF$Llv!;;;;;;;;
+;!lE####
g";LFL$M###$vv!vvvl$F$LE#MMMMELvvv!;;,.,..,,,;;!vLlLMMMMEE$LLlv!;;;;;;
+;;!LE###
$u=F$l$M##Ml!!!vvlL$Lv!lEMMMFllvvv!!;,....,,;;;;lv;;LEMMFL!vllv!;;;;;;
+;;;!LM##
"htFLlF###Ev!!!!vvvvvv!!vvvv!!!!!v!;;,....,,,;,,;;;;;!vv!;;;;;;;;;,,,,
+;;;;!$##
tp:lLM###Fv!!!!!!!;;;;,;;;;;;;!!!;;,,.....,,,,,,,,;;;,,,,.,,,,,,,,,,,;
+;;;;vE##
//wlFM###Fv!!!!!;;;,,,,,,,,,,;;;;;,,.......,,,,..,,,,,,......,,,,,,,,,
+;;;;!$##
ebplLE####Fv!!!!;;;,,,,,,,,,,,;;;;;,,............................,,,,,
+,;;;;!LM
ageLF#####Ev!!;;;;,,,,,,....,,,;;;;,,.....,,,,....................,,,,
+,;;;!!$#
s.cFM#####Mv!!;;;,,,,,.......,;;!;,,..`...,,,,,....```````````.....,,,
+,;;!!vF#
har#######l!;;;;,,,.........,;;;,,...`......,,,..``````````````...,,,;
+;;!vlE##
ter#######L!!;;,,,,........,,;,,!!;,,,,,!!;..,,...`````````````...,,,;
+;;!vLM##
.ne#######Fv!;;;,,........,,,;;!l$l!;;;!lLl;,,,.....`````````....,,,;;
+;!vv$###
t/j########Ml!;;;,,,,....,,,,,,;;;;;;;;;;;;;,,,..................,,,,;
+;;!vlE##
yno#########Lv!;;,,,,,,,,,;;;;,,,;;,..,,.,,........,,,........,,,,,,;;
+;;!v$M##
rto#########Ev!;;;;,,,,;!!!!;;;;;;;,,,,,,,,,,,,,..,,;;;;,,,,,,,,,,;;;;
+;!vLM###
n/$##########l!!!;;;;;;;!!!!!!!!;;!;;;,;;;;;,,,,,,,,;;!!;;,,,,,,,;,,;;
+;!lE####
s";##########Ev!!;;;;,;;!!!vvvvvvvvv!!!!!!!!!!!!;!!!;;;,,,,,,,,,,,,,;;
+!v$#####
get###########$!!!;;;;,,;;!vlLLLlllvvvvvv!!!!vvvllvv!;,,.....,,,,,,,;!
+vL######
sto############L!!;;;;,,,;;;!!vvv!!;;,;;,,,,;;;;;;,,,,,.....,,,,,,,;;v
+L#######
re$############$v!;;;;,,;;;;;!!!;;;;;;,;;,,,,,,,,,,,,,,,.,,,,,,,;;!vLM
+########
u,$#############Fl!!;;;;;;;;;;;;;;,,,,,,,,,.....,,,,,,,,,,,,,,,;;!vLF#
+########
s;`##############M$v!!;;;;;;;;;;;,,,,..........,,,,,,,,,,,,,,;;!vlL$E#
+########
$s`################M$l!!;;;;;;;!;;,,....``....,,,,,,,,,,,,;;;!vlllL$M#
+########
;`p####################FLv!!!;;;;;;,,..........,,,,,,,,,;;;!vvvvvllLF#
+########
lay######################ELlv!!!;;;,,..........,,,,,;;;!!vvvvvvvvvlLF#
+########
$s#######################F$Lllv!;;,,,,......,,,,,;;!!vvvvv!!!!!vvlLE#
+########
`#########################E$LLlllvv!;;,,,,,,,;;!!!vvvvv!!!;!;;!!vvl$E#
+########
##########################MFLlllvvlvvvvvvvvvvvvvvvvv!!!;;;;;;;!!!vl$M#
+########
##########################ME$Llvvvvvvvvvvvvvvvvv!!!;;;;;;;;;;;;!vlLFM#
+########
###########################E$Lllvvvvv!!!!!!!!!!;;;;;;;;;;;;;;;!vlL$EM#
+########
#########################MME$llvvvvv!!!!!!!!!;;;;;;;;;;;;;;;!!vllL$FM#
+########
########################MEME$lvvv!!v!!!!!!!;;;;;;;;;;;;;;;;!!!vllL$EM#
+########
######################MEFFMF$lvv!!!!!!!!!!;;;;;;;;;;;;;;;;;!!vvvl$FE##
+########
####################EFFF$EF$Llvv!!!!!;;!!!!!!;;;;;;;;;;;;;;!!!vvL$EM##
+########
##################MMEEFEE$LLlvv!!!!!;;;;;;;;;;;;;;;;;;;;;;!!!!vvLEM###
+########
#############MMF$LL$FF$$Llvvvvv!!!;;;;;,,,,;;;;;;;;;;;;;;;;;;!!vLEMM##
+########
#####MMMMMMMFL!,;;!vvvv!!!!!!!!;;;;;,,,,,,,,,,,,,,,,,,,;;;;;;;;!vl$$FF
+EEMM####
###F$LlLL$FL;;,```.,;!!!!!!;;;;;;;,,,,,,..........,,,,,,,,,,,,,;!!vlll
+lvlFM###
###vvlL$$$v;,.` ``.,,;;;;;;,,,,,,,,.......`````...........,,;;!!!,
+...,LEM#
###,,```` ``.,,;,,,,,,,...`.`')=~s/(...).+\n/$1/gx;$,=~s:@::
+g;eval$,
###,,,,,....```````````````````..,,,.`` . ; japh by liverpole
+
###.,....````````````````.....``` ````````
+
##``.....````````````..````
+
##``````````````````````
+
## ` ``` `!v` `!v
+`
## `` ,vllvv!!v!` !L` ,l
+;
## ., ;ll, .lv .l! ,L; .L
+v
## ;l` ;LLl` ;v `vl` `lv` `;$
+l`
## ;L, v$LLv` ;l. `,Lv `v$llvvvvL
+L,
#` `l! `ll.,;; .lLlvvv!, ,L! .
+l!
#` ;l` `l; `!. `vl` .L! `
+vv`
#` ;l. `L, ;v` ;l` `vl
+;l.
#` `l; .L;``.vL! .l, ,l`
+`;`
#`` `v! ,$L;,,.;l, `v; ``
+
#`` .;` ``!L, ,L, `,, `
+
#`` `,;!!!;,`
+
#``
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|
|