Techdot Internet Relay Chat Resources, Logs, and Records.

<wallow> hello – does anyone know how to use tags in vim
<mmap> ctags yes, never have found a good perl equivalent
<mmap> at least none that honored :: delimiter for tag stack traversing
<RubyPanther> The requested URL /~larry/perl.html was not found on this server. Apache/2.2.20 (Ubuntu) Server at www.wall.org Port 80
<RubyPanther> St. Wall has broken links on his home page, that is even worse than his favorite color!
* GumbyPAN CPAN Upload: Clone-Fast-0.94 by JJORE http://metacpan.org/release/JJORE/Clone-Fast-0.94
<adnap> exit
<adnap> derp
<pkrumins> cats and boots http://www.youtube.com/watch?&v=Nni0rTLg5B8
<buu> PWKRUMINS
<pkrumins> WHAT
<buu> Hi!
<s4ltedt04d> elo
* GumbyPAN CPAN Upload: MojoX-Session-0.25 by VTI http://metacpan.org/release/VTI/MojoX-Session-0.25
<pkrumins> hi buu!
* GumbyPAN CPAN Upload: Data-Page-Pagination-0.001 by STEFFENW http://metacpan.org/release/STEFFENW/Data-Page-Pagination-0.001
<rsimoes2> are there any right-reduce implementations on cpan?
* GumbyPAN CPAN Upload: YAML-Syck-1.20_01 by TODDR http://metacpan.org/release/TODDR/YAML-Syck-1.20_01
<pkrumins> TRANCE ON
<driller_work> hi, I have an object I create through a package, basically I do a my $object = new something(parameter1, 2, 3); — but what I’ve stumbled upon is that once I create this object I want to be able to re-us<pkrumins> sure, make it package global
<pkrumins> then import it
<pkrumins> or just use it
<driller_work> thing is, I’ve used EXPORT but I am creating this object in my main perl script, and not in a package. can I still import it?
<pkrumins> read more in perl{b,t}oot
<pkrumins> driller_work: yes, just create a new .pm file and put that object there
<pkrumins> driller_work: then you can use that .pm package with that object from your perl script
<driller_work> hmm that sounds reasonable, the object itself is in a seperate .pm as we speak; although, I define it in my main script, if I use the .pm package in my other package, can I simply just do a “use” and hav<pkrumins> driller_work: nope
<driller_work> darn, could you briefly tell me how I should do it?
<huf> package thingie { my $the_object; sub get_it { $the_object ||= __PACKAGE__->new(@_) } …. sub new { … } … and all the rest }
<huf> maybe
<driller_work> hmm
* GumbyPAN CPAN Upload: Statistics-Descriptive-3.0300 by SHLOMIF http://metacpan.org/release/SHLOMIF/Statistics-Descriptive-3.0300
<polettix> I have an XS module that needs a library to be already installed and I’m getting errors from cpantesters
<polettix> how should I set a dependency for the library?
* GumbyPAN CPAN Upload: EBook-MOBI-0.1 by BORISD http://metacpan.org/release/BORISD/EBook-MOBI-0.1
* GumbyPAN CPAN Upload: Error-0.17017 by SHLOMIF http://metacpan.org/release/SHLOMIF/Error-0.17017
* GumbyPAN CPAN Upload: Lexical-SealRequireHints-0.007 by ZEFRAM http://metacpan.org/release/ZEFRAM/Lexical-SealRequireHints-0.007
<achromic> polettix: see Devel::CheckLib
<Botje> A GLORIOUS MORNING TO YOU FINE INHABITANTS OF #PERL
* GumbyPAN CPAN Upload: Test-ModuleVersion-0.06 by KIMOTO http://metacpan.org/release/KIMOTO/Test-ModuleVersion-0.06
<Alcohol> Please vote http://missdv.ru/vote/566/
<Botje> sigh
<Botje> probably not much chance to get that fucker’s account removed
<Kharec> hi guys.
* GumbyPAN CPAN Upload: ClearCase-Wrapper-MGi-0.31 by MGI http://metacpan.org/release/MGI/ClearCase-Wrapper-MGi-0.31
<potatoe5> sup
<Su-Shee> hello everyone!
<Cipher-0> Hand over the coffee and no one gets hurt.
<Cipher-0> I mean, “Hi!”
<Su-Shee> I’m already in the late brunch state, accompagned no wait that’s too french.. accompanied? with tea.
* GumbyPAN CPAN Upload: Dist-Zilla-PluginBundle-NIGELM-0.15 by NIGELM http://metacpan.org/release/NIGELM/Dist-Zilla-PluginBundle-NIGELM-0.15
<jamesaxl> hi
<Su-Shee> no valentine’s day this year – here’s mathematical proof: 14-02-12 = 0 (found on teh intertubes..
<Cipher-0> Yay!
<anno> eval: 02/14/12
<perlbot> anno: 0.0119047619047619
<Su-Shee> eval: 14/02/12
<perlbot> Su-Shee: 0.583333333333333
<hippie> eval: 25 || 6 ** 4
<perlbot> hippie: 25
<Su-Shee> well I get at least half a valentine’s day..
<Cipher-0> Got SWMBO a nice card and $25 iTunes.
<Cipher-0> “Roses last for a week. Music is forever.”
<Su-Shee> I get gifts all year.
* GumbyPAN CPAN Upload: DBIx-Custom-0.2111 by KIMOTO http://metacpan.org/release/KIMOTO/DBIx-Custom-0.2111
<Cipher-0> So does SWMBO
<rindolf> Hi all.
<Cipher-0> Hand over the coffee and no one gets hurt.
<Cipher-0> I mean, “Hi!”
<Su-Shee> is that an auto-greet..?
<Cipher-0> Nope.
<Cipher-0> … but the caffeine is no longer heping.
<Cipher-0> helping, either.
<rindolf> Cipher-0: I don’t have any coffee.
<rindolf> Cipher-0: I don’t drink coffee either.
<Cipher-0> BLASPHEMER!
<Su-Shee> I drink coffee, tea, wine, beer, cocktails, I eat sugar, chocolate, bacon, salt and BUTTER. I’m going to hell very happy.
<Cipher-0> You should have said bacon twice.
* GumbyPAN CPAN Upload: App-GSD-0.4 by RJH http://metacpan.org/release/RJH/App-GSD-0.4
<jamesaxl> i see tht in Freenode channel i get many knowldge than in University
<morgajel> jamesaxl: there is truth to that.
<jamesaxl> s/channel/channels
<rsimoes> We’re going to be here all day if you’re going to regex-replace that sentence one word at a time
<anno> all about valentines day
<rsimoes> <3
<morgajel> hrm… cpan is refusing to install Time::Format; does anyone have the time to help me troubleshoot it? here’s the output so far. http://morgajel.net/stuff/timeformat.txt
<morgajel> this is on a centos6.2 fresh install
<rindolf> perlbot: red hat
<perlbot> rindolf: No factoid found. Did you mean one of these: [redhat]
<rsimoes> install Date::Manip
<rindolf> perlbot: redhat
<perlbot> rindolf: redhat sux
<rindolf> perlbot: no you suck!
<perlbot> rindolf: No factoid found. Did you mean one of these: [.NC.us] [.NJ.us] [nachos] [noses]
<rsimoes> look at the list of failing prereqs; redhat/centos half-assedly makes their perl rpms
<morgajel> rsimoes: it is installed.
<rsimoes> also, don’t use cpan with the system perl
<rsimoes> destined for tears next time you run yum-update
<rsimoes> i.e., compile yourself a shiny new perl
<morgajel> that’s a non-answer when supporting 800 servers.
<morgajel> :/
<rsimoes> don’t you have an image box for them? =[
<morgajel> that's what I'm developing
<morgajel> trying to figure out the prereqs for some apps
<morgajel> finalize the standard build
<morgajel> perl/cpan is the only thing left giving me grief. I've been writing perl since 2003, so I have no animosity towards it, I just want to get this done
<anno> you have to do that on each of 800 servers?
<Cipher-0> Wait, so you've been given a solution - inconvenient as it may be - and it's a non-answer?
<rsimoes> I don't see how it's a non-answer if you only have to do it once
<Cipher-0> Hint: It's not.
* GumbyPAN CPAN Upload: Nginx-Runner-0.000001_1 by UNDEF http://metacpan.org/release/UNDEF/Nginx-Runner-0.000001_1
* GumbyPAN CPAN Upload: CIF-Client-0.03 by SAXJAZMAN http://metacpan.org/release/SAXJAZMAN/CIF-Client-0.03
<morgajel> anno: no, I'm trying to figure out what is needed to make it part of our build. supporting and maintaining an in-house compiled perl is not ideal.
<anno> compiling your own perl is standard on many systems
<morgajel> anno, this is all besides the point; my question was regarding why cpan was failing to build Time::Format
<Cipher-0> rsimoes also, don't use cpan with the system perl
<anno> the answer was it probably won't fail with a locally compiled perl
<rsimoes> Date::Manip is pre-installed by centos
<rsimoes> who knows what they did with it beforehand
<rsimoes> reinstall that
<morgajel> ah, so regardless of using CPAN to install Date::Manip, it will fail.
<rsimoes> and have an icepick ready to stab yourself with the next time you upgrade your repos
<morgajel> rsimoes: I've never really had any grief with it
<Cipher-0> You have now.
<rsimoes> I refute your claim thus
<anno> mixing cpan and the system's package manager is generally a problem
<morgajel> that is unfortunate; there are only two systems that need this particular module; it doesn't warrant replacing perl on the rest of the systems.
<rsimoes> You have CPAN.pm up to date? Installed Bundle::CPAN, too?
<anno> Bundle::CPAN? why?
<rsimoes> shotgun solution :
<rsimoes> Bundle::CPAN has lots of high-up-in-the-tree dependencies for other distributions
<rsimoes> you have perl 5.10.1, so your CPAN.pm rpm will be out of date by quite a lot
<rsimoes> I don't even think it has the upgrade command
<anno> btw, Time::Format has a rather mixed test matrix
<anno> cpan may have nothing to do with the failure
<rsimoes> you can always just close your eyes and skip the make tests!
<morgajel> yeah, even removing the system Date::Manip, it still fails on date manip
* GumbyPAN CPAN Upload: Validation-Class-5.0.0_01 by AWNCORP http://metacpan.org/release/AWNCORP/Validation-Class-5.0.0_01
<morgajel> at this point it will be easier just to strip out Time::Format.
<morgajel> thanks guys for your assistance.
<anno> indeed. a random failed test from the matrix looks a lot like yours. the module is probably broken
* GumbyPAN CPAN Upload: App-Cmd-0.316 by RJBS http://metacpan.org/release/RJBS/App-Cmd-0.316
<Cipher-0> Off tpic: How long is long enough when generating a trwucrypt random key?
<Cipher-0> I'm at the "move the mouse around" part.
* GumbyPAN CPAN Upload: Encode-Locale-1.03 by GAAS http://metacpan.org/release/GAAS/Encode-Locale-1.03
* GumbyPAN CPAN Upload: Net-FullAuto-0.9994 by REEDFISH http://metacpan.org/release/REEDFISH/Net-FullAuto-0.9994
<anno> someone op up, just in case
<lucs> Can a Moose "isa" be something like a HoH?
<anno> you mean "isa => 'ArrayRef[HashRef[Str]]’”
<lucs> More like ‘HashRef[HashRef[Str]]’ — does that make sense?
<anno> sure
<lucs> Cool. Thanks!
* GumbyPAN CPAN Upload: Net-FullAuto-0.9995 by REEDFISH http://metacpan.org/release/REEDFISH/Net-FullAuto-0.9995
* GumbyPAN CPAN Upload: Rex-0.24.0 by JFRIED http://metacpan.org/release/JFRIED/Rex-0.24.0
<rindolf> lucs: note that Moose has some limitations in checking nested data structures.
<Kharec> hi guys
<rindolf> Kharec: hi.
<Kharec> is there a way to multiply two matrix (same size) with Math::Matrix, or may I use another lib?
<Kharec> rindolf:
<lucs> rindolc: In what I’m trying to do, it’s not so much for the checking than for explicitly stating what I’m expecting to have.
<lucs> Er, *rindolf
<lucs> rindolf: But thanks for the heads up.
<rindolf> Kharec: PDL can do element-by-element multiplication, but it has some limitations on what the matrix elements’ are.
<Kharec> Ahh:)
<rindolf> lucs: OK.
<Kharec> thanks.
<rsimoes> I had a dream last night that mst agreed with me on something
<rsimoes> I don’t remember what
<rsimoes> but it was exhilarating =[
<rindolf> rsimoes: heh.
* GumbyPAN CPAN Upload: Compress-LZ4-0.01 by GRAY http://metacpan.org/release/GRAY/Compress-LZ4-0.01
* GumbyPAN CPAN Upload: Yote-0.070 by CANID http://metacpan.org/release/CANID/Yote-0.070
<Canyon_> hi
<Canyon_> is this ok to replace windows reserved characters?
<Canyon_> s/[< | > | " |/ |\ |||? |* |]+/ /gi;
<Botje> no.
<anno> yuck. use a character class
<Paladin> Canyon_: 1) most of those don’t need to be escaped, 2) you don’t need | in character classes
<rewt> looks like he’s trying to
<anno> oh, belt and suspenders
<Paladin> Canyon_: 3) it’s better to select character that are allowed rather than try to weed out characters that aren’t allowed..
<anno> really a job for tr///
<rewt> 4) don’t need case-insensitiveness when it doesn’t do anything
<Botje> just in case you run into the dreaded uppercase >
<mst> rewt: maybe it’s ‘gi’ as in ‘gastro-intestinal tract’ to warn the reader the regexp is complete shit?
<rewt> haha maybe
<Botje> Canyon_: String::MFN may or may not be what you’re looking for
<Canyon_> i’m checking it now
<Botje> hmm, it’s not quite there yet
<jfriedl> eval: int( 0123 );
<perlbot> jfriedl: 83
<jfriedl> eval: int( q{0123} );
<perlbot> jfriedl: 123
<jfriedl> Um, what?
<buu> 0123 is treated as octal
<Paladin> jfriedl: literals starting with 0 are octal
<buu> 0x is hex
<jfriedl> I know
<rewt> eval: oct( ’0123′ );
<perlbot> rewt: 83
<jfriedl> but why isn’t a string “0123″ treated like na octal too
<buu> It’s not a literal
<Paladin> jfriedl: only literal numbers starting with 0 are
<jfriedl> I mean, why isn’t it treated as an octal with the int() function
<mst> jfriedl: because it’s a string.
<buu> It’s not int translating 0123 into 83, it’s perl compiler
<mst> jfriedl: 0123 is syntax
<mst> eval: int( eval( q{0123} ) )
<perlbot> mst: 83
<mst> jfriedl: tada
<jfriedl> right
<mst> jfriedl: or you can pass it through the oct() function
* GumbyPAN CPAN Upload: Data-WeightedRoundRobin-0.03 by XAICRON http://metacpan.org/release/XAICRON/Data-WeightedRoundRobin-0.03
<jfriedl> although it does seem odd that int() wouldn’t do that already. I understand in general though, however my question was pertaining to int() and why it doesn’t interpret “0123″ as 0123 oct
<jfriedl> mst: yes I know of oct(), thanks
<mst> jfriedl: it isn’t odd at all
<mst> jfriedl: int(“000123.23″) might happen for example
<buu> jfriedl: There’s two steps here, not one.
<jfriedl> ah
<mst> jfriedl: perl transparently converts it wrong a string to a number when int() requests the numeric value
<buu> jfriedl: The perl compiler does the translation of 0123
<mst> jfriedl: only the compiler and the oct() function trigger the special behaviour
<mst> jfriedl: in order to not be horribly surprising
<mst> jfriedl: if you look at perldoc overload
<jfriedl> (wait, octals can’t have fraction parts?)
<mst> jfriedl: you can actually overload perl’s interpretation of string and numeric literals
<mst> jfriedl: imagine that the compiler implicitly adds an oct() step using that
<jfriedl> right
<mst> jfriedl: and you’ll get the behaviour quite precisely
<mst> also, I never said octals didn’t have fraction parts
<mst> I’m suggesting that if somebody just pulled a field out of a CSV file
<mst> int() interpreting as octal just because it had leading zeroes might really ruin somebody’s day
<jfriedl> mst: sorry then. when you made mention of int(“000123.23″), it sounded like that couldn’t be an octal. I guess I misunderstood then.
<mst> I’m pretty sure Reuters would cry, for example
<mst> jfriedl: no, I was saying it would be incredibly fucking stupid for perl to interpret it as octal
<mst> jfriedl: given the odds are pretty good that isn’t what the user wanted
<jfriedl> mst: that’s probably quite true
<mst> I do see how it seemed inconsistent to you, mind
<mst> hence why I’m suggesting you see it as “the compiler implicitly runs oct() on bare numbers”
<jfriedl> ah
<mst> because looking at it that way, the behaviour is entirely consistent
<jfriedl> indeed
<mst> (and the implementation is, I think, actually bloody close to that)
<jfriedl> Thank you
<Poohba> hi
<rindolf> Poohba: hi.
<jfriedl> eval: 0123.23
<perlbot> jfriedl: 8323
<jfriedl> eval: sprintf “%f”, 0123.23
<perlbot> jfriedl: 8323.000000
<jfriedl> eval: sprintf “%f”, 123.23
<perlbot> jfriedl: 123.230000
<jfriedl> hmmm
<Poohba> in bash I would do something like NEWFILE=${FILE%.*}.jpeg. How do you do something like this in PERL?
<DrForr> 0123 is octal, not decimal.
<Aerdan> tip: perlbot can be used in PM, too.
<mst> Poohba: I don’t know, what would that do?
* mst writes sh not bash
<DrForr> Poohba: It’s perl, not PERL. and what does that do in bash?
<Poohba> yesh. sh
<rindolf> eval: my $file = “Hello.foo”; $file =~ s/.foo$/.jpeg/; [$file]
<perlbot> rindolf: ["Hello.jpeg"]
<mst> Poohba: no, not sh. bash.
<Botje> Poohba: it would give hilarious results if $NEWFILE contained a . besides the extension
<mst> Poohba: now, please answer the fucking question rather than gibbering at me.
<mst> “yesh. sh” when you’re using a bash specific feature is useless
<rindolf> eval: my $file = “Hello.foo”; $file =~ s/.[^.]*z/.jpeg/; [$file]
<perlbot> rindolf: ["Hello.jpeg"]
<rindolf> Better.
<Poohba> it takes the value of FILE and removes from ‘.’ to the end of the filename and replaces it with .jpeg
<mst> Poohba: (my $newfile = $file) =~ s/.[^.]*z/.jpeg/;
<mst> Poohba: or, if you’re on 5.14
<mst> Poohba: my $newfile = $file =~ s/.[^.]*z/.jpeg/r;
<Poohba> I am on 5.14 but the other way… is that post 5.14 or pre 5.14?
<mst> Poohba: the ‘r’ modifier is new in 5.14
<jfriedl> DrForr: yes, it’s octal, but I’m trying to figure out why it becomes 8323. I can see that the implicit octal conversion occurs up to the point, but why does it just tack the 23 (from .23) on the end like that<Poohba> Botje: yes it does because there were some files that are like that.
<Poohba> thanks
<rindolf> jfriedl: the concatenation operator.
<rindolf> jfriedl: and the fact that octal constants can only be integers.
<jfriedl> DOH
<jfriedl> right
* jfriedl facepalms
<jfriedl> I should of known that. Guess I need more wake up juice
<thrig> James Bond in Octobuggy
<jfriedl> haha
<rindolf> thrig: heh.
<Poohba> what is the preferred way to call a program? qx() system() or “? I see it done all ways online
<mst> jfriedl: should *have*
<jfriedl> Bin, James Jin
<jfriedl> s/Jin/Bin/
<Aerdan> Depends on what you need.
<rindolf> Poohba: also look at IPC::Run .
<rindolf> perlbot: system