But seriously, I don't mind . in other languages, but in perl? It makes me queasy
-. | $rock-.()-.the-.kasbah(); | $rock-. ()-. the-. kasbah(); |
~. | $rock~.()~.the~.kasbah(); | $rock~. ()~. the~. kasbah(); |
&. | $rock&.()&.the&.kasbah(); | $rock&. ()&. the&. kasbah(); |
?. | $rock?.()?.the?.kasbah(); | $rock?. ()?. the?. kasbah(); |
+. | $rock+.()+.the+.kasbah(); | $rock+. ()+. the+. kasbah(); |
!. | $rock!.()!.the!.kasbah(); | $rock!. ()!. the!. kasbah(); |
-.. | $rock-..()-..the-..kasbah(); | $rock-.. ()-.. the-.. kasbah(); |
-.-. | $rock-.-.()-.-.the-.-.kasbah(); | $rock-.-.()-.-.the-.-. kasbah(); |
==. | $rock==.()==.the==.kasbah(); | $rock==. ()==. the==. kasbah(); |
?-. | $rock?-.()?-.the?-.kasbah(); | $rock?-. ()?-. the?-. kasbah(); |
-.? | $rock-.?()-.?the-.?kasbah(); | $rock-.? ()-.? the-.? kasbah(); |
&-. | $rock&-.()&-.the&-.kasbah(); | $rock&-. ()&-. the&-. kasbah(); |
&&-. | $rock&&-.()&&-.the&&-.kasbah(); | $rock&&-.()&&-.the&&-. kasbah(); |
-&. | $rock-&.()-&.the-&.kasbah(); | $rock-&. ()-&. the-&. kasbah(); |
-&&. | $rock-&&.()-&&.the-&&.kasbah(); | $rock-&&.()-&&.the-&&. kasbah(); |
-.& | $rock-.&()-.&the-.&kasbah(); | $rock-.& ()-.& the-.& kasbah(); |
-.&& | $rock-.&&()-.&&the-.&&kasbah(); | $rock-.&&()-.&&the-.&& kasbah(); |
-=. | $rock-=.()-=.the-=.kasbah(); | $rock-=. ()-=. the-=. kasbah(); |
=-. | $rock=-.()=-.the=-.kasbah(); | $rock=-. ()=-. the=-. kasbah(); |
?. | $rock?.()?.the?.kasbah(); | $rock?. ()?. the?. kasbah(); |
?-. | $rock?-.()?-.the?-.kasbah(); | $rock?-. ()?-. the?-. kasbah(); |
?-.: | $rock?-.:()?-.:the?-.:kasbah(); | $rock?-.:()?-.:the?-.: kasbah(); |
~.: | $rock~.:()~.:the~.:kasbah(); | $rock~.: ()~.: the~.: kasbah(); |