Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

JAPH Made Entirely of Colons

by ColonelPanic (Friar)
on Nov 28, 2012 at 08:31 UTC ( [id://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

Replies are listed 'Best First'.
Re: JAPH Made Entirely of Colons
by choroba (Cardinal) 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
Domain Nodelet?
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?Last hourOther CB clients
Other Users?
Others contemplating the Monastery: (6)
As of 2025-02-07 14:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Which URL do you most often use to access this site?












    Results (94 votes). Check out past polls.