Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

JAPH Made Entirely of Colons

by ColonelPanic (Friar)
on Nov 28, 2012 at 08:31 UTC ( #1005978=obfuscated: print w/ replies, xml ) Need Help??

Inspired by tobyink's recent post...

use warnings; use strict; package :::::::::: {$_=q:!:;$:::::::::: =q;:;;sub :::::::::: {s::@_:}}&:::::::::: ($ :::::::::: . ':::::::::: ',$ :::::::::: x10);$ :::::::::: =q;::;;s. :::::::::: .$ :::::::::: \.$ :::::::::: \.' '\.$ :::::::::: \.$ :::::::::: \.$:::::::::: .gex;s: \n::gx;print


When's the last time you used duct tape on a duct? --Larry Wall

Comment on JAPH Made Entirely of Colons
Download Code
Re: JAPH Made Entirely of Colons
by choroba (Abbot) on Nov 28, 2012 at 09:26 UTC
    Isn't it missing a final : (or ;) in the output?
    لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
      Thanks for pointing out this major design problem with my code ;). Is it better now?


      When's the last time you used duct tape on a duct? --Larry Wall
Re: JAPH Made Entirely of Colons
by blackle (Beadle) on Nov 28, 2012 at 15:39 UTC

    Just another colon hacker!

Re: JAPH Made Entirely of Colons
by Anonymous Monk on Dec 28, 2012 at 18:26 UTC

    not to hard after properly formatting the white space. most confusing thing was the second to last regex.


    solution:
    #!/usr/bin/perl $_ = '!'; sub preRegex{ s//@_/; } preRegex(':::::::::::', ':' x 10); s. ::::::::.::\.::::\.' '\.:: \.:: \.::.gex; chomp $_; print $_;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://1005978]
Front-paged by Arunbear
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2014-09-16 04:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (155 votes), past polls