Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Comment on

( #3333=superdoc: print w/ replies, xml ) Need Help??

Hmm, doesn't seem to work on Perl 5.12:

Type of arg 1 to push must be array (not string eq) at trizen_obfus.pl + line 12, near "gethostent and" Type of arg 1 to unshift must be array (not quoted execution (``, qx)) + at trizen_obfus.pl line 17, near "pos xor" Type of arg 1 to shift must be array (not umask) at trizen_obfus.pl li +ne 17, near "pos xor" Type of arg 1 to splice must be array (not shift) at trizen_obfus.pl l +ine 17, near "pos xor" Type of arg 1 to pop must be array (not wantarray) at trizen_obfus.pl +line 22, near "wantarray and" Type of arg 1 to shift must be array (not kill) at trizen_obfus.pl lin +e 22, near "wantarray and" Type of arg 1 to unshift must be array (not shift) at trizen_obfus.pl +line 22, near "wantarray and" Type of arg 1 to splice must be array (not unshift) at trizen_obfus.pl + line 22, near "wantarray and" Execution of trizen_obfus.pl aborted due to compilation errors.

Here's the perl version i'm using:

cavac@planetx:~/src/temp$ perl -V Summary of my perl5 (revision 5 version 12 subversion 3) configuration +: Platform: osname=linux, osvers=2.6.11-1.1369_fc4, archname=x86_64-linux-thre +ad-multi uname='linux perl-linux64-vm 2.6.11-1.1369_fc4 #1 thu jun 2 22:56: +33 edt 2005 x86_64 x86_64 x86_64 gnulinux ' config_args='-ders -Dcc=gcc -Dusethreads -Duseithreads -Ud_sigsetj +mp -Uinstallusrbinperl -Ulocincpth= -Uloclibpth= -Duse64bitall -Dlibp +th=/lib64 /usr/lib64 /usr/local/lib64 -Accflags=-DUSE_SITECUSTOMIZE - +Duselargefiles -Accflags=-fno-merge-constants -Dprefix=/home/cavac/bi +n/ActivePerl-5.12 -Dprivlib=/home/cavac/bin/ActivePerl-5.12/lib -Darc +hlib=/home/cavac/bin/ActivePerl-5.12/lib -Dsiteprefix=/home/cavac/bin +/ActivePerl-5.12/site -Dsitelib=/home/cavac/bin/ActivePerl-5.12/site/ +lib -Dsitearch=/home/cavac/bin/ActivePerl-5.12/site/lib -Dsed=/bin/se +d -Duseshrplib -Dcf_by=ActiveState -Dcf_email=support@ActiveState.com +' hint=recommended, useposix=true, d_sigaction=define useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=und +ef use64bitint=define, use64bitall=define, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE + -fno-merge-constants -fno-strict-aliasing -pipe -D_LARGEFILE_SOURCE +-D_FILE_OFFSET_BITS=64', optimize='-O2', cppflags='-D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE -fno-merg +e-constants -fno-strict-aliasing -pipe' ccversion='', gccversion='4.0.0 20050519 (Red Hat 4.0.0-8)', gccos +andvers='' intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=1 +6 ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', + lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='gcc', ldflags ='' libpth=/lib64 /usr/lib64 /usr/local/lib64 libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc libc=/lib/libc-2.3.5.so, so=so, useshrplib=true, libperl=libperl.s +o gnulibc_version='2.3.5' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E - +Wl,-rpath,/home/cavac/bin/ActivePerl-5.12/lib/CORE' cccdlflags='-fPIC', lddlflags='-shared -O2' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP USE_64_ +BIT_ALL USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES USE_PERLIO USE_PERL_ATOF USE_REENTRANT_API USE_SITECUSTOMIZE Locally applied patches: ActivePerl Build 1204 [294330] c6fbf28 [perl #71806] perldb does not setup %dbline with the sheba +ng option -d 1fd8fa4 Add Wolfram Humann to AUTHORS f120055 make string-append on win32 100 times faster a2a8d15 Define _USE_32BIT_TIME_T for VC6 and VC7 007cfe1 Don't pretend to support really old VC++ compilers 6d8f7c9 Get rid of obsolete PerlCRT.dll support d956618 Make Term::ReadLine::findConsole fall back to STDIN if /de +v/tty can't be opened 321e50c Escape patch strings before embedding them in patchlevel.h Built under linux Compiled at Feb 9 2011 14:48:47 @INC: /home/cavac/bin/ActivePerl-5.12/site/lib /home/cavac/bin/ActivePerl-5.12/lib

Don't use '#ff0000':
use Acme::AutoColor; my $redcolor = RED();
All colors subject to change without notice.

In reply to Re: JAPH from keywords and functions by cavac
in thread JAPH from keywords and functions by trizen

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • Outside of code tags, you may need to use entities for some characters:
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    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-08-31 01:41 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      The best computer themed movie is:











      Results (294 votes), past polls