| |
| |
| |
|
Page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
Comments:
<0> ?? trying to write a script that logs onto a website via ssl (using pk12s and x509 certs specified by me locally) .. have the web part of it down but not the SSL part ... anybody think of a module that supports this?
<1> eol - ask search.cpan.org about ssl
<0> kk..will look again :)
<2> Eol: LWP should do that transparently
<3> I don't think he is looking for transparency
<0> kk...have LWP ..will look at the docs closer
<2> Eol: you may hand over IO::Socket::SSL options to lwp
<4> how do i install perl modules locally in my /home? it'll be hours before i can ask root to do it.
<4> nevermind, someone else answered
<2> perldoc perlmodinstall
<5> The perldoc for perlmodinstall - Perl modules: how to install from CPAN is at http://perldoc.perl.org/perlmodinstall.html
<3> perlbot: life with cpan
<6> Information pertaining to the Comprehensive Perl Archive Network (CPAN) can be found at http://sial.org/howto/perl/life-with-cpan/
<4> life with cpan? heh
<7> is there a function to check if a number is already in a table ?
<8> A table?
<7> an array
<3> grep
<8> You have to iterate through it. You can do that with grep or a for loop
<7> thanks
<9> ion_bidon: may you could use a hash instead?
<7> can I use push with hash or something similar ?
<9> just ***ign the keys: $hash{$key} = $value;
<8> No, hashes aren't ordered, so push doesn't really make sense there
<9> no need for a push... unless you want them ordered
<7> $hash{$value} = $value and to verify exists($hash($value)) ?
<7> oups
<9> exists($hash{$value})
<7> yes
<9> ion_bidon: you could also do: $hash{$value} = undef; and then still be able to use exists()
<9> that *might* save memory while giving you quick access for "searching"
<7> it's ok the hash won't have more than 100 numbers
<7> :)
<10> Can somebody give me an example for creating a splitted window like irssi with Term::Visual which doesn't exit until I press ctrl+c ?
<11> FYI, the same pcre regex doesn't work in php 5.0.4 but does in php 5.1.2.
<12> HATE.
<12> Simplex3: I don't think we care.
<11> You cared enough to take the time to say you didn't.
<11> Doh!
<11> Wrong channel, my bad.
<13> how do i tell MakeMaker to not keep a copy of Makefile.old after a 'make clean' ???
<14> how do i share data in between threads ?
<14> other than that ineffective threads : shared thingy that just copies
<15> ProN00b, perldoc threads::shared
<5> The perldoc for threads::shared - is at http://perldoc.perl.org/threads/shared.html
<14> +_+
<16> hmm
<10> gn8 :)
<17> Im using http://search.cpan.org/~tima/XML-RSS-Parser-4.0/lib/XML/RSS/Parser.pm and I am trying to figure out how to make it so when when I grab a feed "Perl/XML/SAX/PurePerl/1.0 libwww-perl/5.803" isnt what shows, or if it does Id just like to be able to put a link in that line to let the admins of the sites know where to look on my site for some info about why I am grabbing their feed etc (trying to be a nice little bot) how can I do that?
<18> errr's url is at http://xrl.us/j4ff
<19> err - HTFS ?
<3> errr: you could just grab the file yourself with LWP::UserAgent
<20> errr: There may be an ->agent method that you can call to set that.
<17> Khisanth: well it already will do the grabbing for me using my $feed = $p->parse_uri($url); so Id like to not have to change the code to much if I dont have to
<17> yrlnry: ok Ill look into that and see thanks
<19> $ cpan -i XML::RSS::Parser ; cd ~/.cpan/build ; grep -rin Perl/XML/SAX *
<19> XML-SAX-0.13/SAX/PurePerl/Reader/URI.pm:33: $ua->agent("Perl/XML/SAX/PurePerl/1.0 " . $ua->agent);
<17> ahh cool, so I can set this in my app, thanks
<19> it doesn't look to me like there is a clean way to set this
<19> so if you change that line, it'll change any other app you have that's using XML-SAX
<17> oh, well crap
<3> ... grabbing the file isn't exactly difficult
<19> so you'll have to hack the source to percolate the agent() method so you can set the string of your choice in XML::SAX and then in XML::RSS::Parser
<19> errr - does it do any recursive grabbing when you do my $feed = $p->parse_uri($url); ?
<19> if not, i think Khisanth is right
<19> unless you want to hack those different modules to allow the agent string to be settable, release patches to the upstream authors, etc.
<3> a rather pointles hack IMO
<17> well Its going to 25 places and the code is already done and bug free so I just didnt want to have to change much if I didnt have to
<3> the first not the second one
<17> but Id rather chamnge it to use lwp than make those other changes
<3> afraid to change your own code? -_-
<17> no I want it to be complete. I just wanted to see if there is a way using what I have before I go changing it after I sent all this time getting it working to begin with
<17> spent*
<19> errr - perhaps you should make a little function that calls parse_uri(get_http($url, $your_agent_string))
<19> seems pretty simple to me
<17> ok, Ill see what I can do, thanks for the help
<21> Holy CRAP
<21> http://worldofkane.blogspot.com/2006/02/japanese-spider-man.html
<18> ew73's url is at http://xrl.us/j4ft
<22> Hi!
<22> How could I install CPAN packages?
<19> cpan -i $packagename
<23> or type cpan
<22> Someone here had user PAC?
<19> user PAC ?
<23> weirdo
<17> Khisanth, brianski thanks for the help, only had to add a few extra lines to add that support with LWP::UserAgent
<24> i was looking for Apache::Registry on my debian server.. and i found ModPerl::Registry.. is that the same or what?
<19> is springfield, m***achusetts the same as springfield, illinois?
<24> brianski, i wonder if it was some crazy debian rename or something :P
<19> ahhahaha i'm an ***hole
<19> it is the same thing i think
<19> http://search.cpan.org/author/PGOLLUCCI/mod_perl-2.0.2/docs/api/ModPerl/Registry.pod
<19> http://search.cpan.org/~gozer/mod_perl-1.29/lib/Apache/Registry.pm
<24> brianski, grrr :)
<18> brianski's url is at http://xrl.us/j4fx
<19> or at least, similar
<22> Someone has installed Ogg::Vorbis?
<24> brianski, ModPerl::* seems to be the 2.0 version for 1.0 Apache::*
<25> is there a way to only list channels that match a pattern? IRC that is
<26> what does it have to do with perl?
<9> linuxnohow: /list *blah* ?
<26> if ($channel =~ /$pattern/) {print $channel;} =)
<27> This channel is 80% non-perl.
<25> wow i didn't think anyone would play the non-perl card on that one
<25> <19> is springfield, m***achusetts the same as springfield, illinois?
<25> ftw
<26> Yaakov: then what does 80% non-perl do?
<25> thanks pravus, that worked
<25> rkama argue semantics
<27> perlbot: off topic
<26> thnx Yaakov for sharing your opinion
<28> eval: @A=qw(T A G C); $a=""; $a.=$A[rand(@A)] for (1..27);
<29> simcop2387: Return:
<27> perlbot: offtopic
<28> eval: @A=qw(T A G C); $a=""; $a.=$A[rand(@A)] for (1..27); $a;
<29> simcop2387: Return: GCAGACACTGCGTATCAGAATGTAACA
<27> rkama: No thanks are necessary.
<26> linuxnohow oriented sentence was actually
<26> good night
<28> eval: @A=qw(T A G C); $a=""; $a.=$A[rand(@A)] for (1..52); $a;
<29> simcop2387: Return: GCAGACACTGCGTATCAGAATGTAACAGTTTAGTGGAGGTGAGTGACGCGTC
<27> simcop2387: STOP YOUR GENETIC EXPERIMENTS BEFORE IT IS TOO LATE
<30> evalbot_9054: $a.=$_[rand (@_ = qw{T A G C})] for 1 .. 27; $a
<30> arg
<30> evalbot_9054: $a.=$_[rand (@_ = qw{T A G C})] for 1 .. 27; $a
<30> stupid bloddy xchat
<26> :)))
<25> avar haha same thing happens to me in BitchX
<25> i gotta switch over to irssi
<25> but i'll lose my /uptime
<26> which is...?
<30> eval: $a.=$_[rand (@_ = qw{T A G C})] for 1 .. 27; $a
<29> avar: Return: GCAGACACTGCGTATCAGAATGTAACA
<28> Yaakov: no can do
<30> ha!
<25> 57d
<30> turned it off
<27> simcop2387: You are evil and must be stopped.
<28> Yaakov: but i'm wanting to embed perl in bacteria!
<27> The first computer bacteria. The antivirus software is useless!
<28> no this'd be a bacterial computer, antibacterial soap can wipe your hard drive
<7> I forgot where is the perldoc for regex (command line perldoc ? )
<28> perldoc perlre
<5> The perldoc for perlre - Perl regular expressions, the rest of the story is at http://perldoc.perl.org/perlre.html
<28> eval: @A=qw(T A G C); $a=""; $a.=$A[rand(@A)] for (1..81); $a;
<29> simcop2387: Return: GCAGACACTGCGTATCAGAATGTAACAGTTTAGTGGAGGTGAGTGACGCGTCCTCCGCGCCGGGTTAGCTAAATGGTCGGA
<30> simcop2387: your code needs more lazyness
<28> ooo i can do it via amino acids!
<7> simcop2387 thanks (btw it's annoying for tab compiletion you have 2 different nicks)
Return to
#perl
or
Go to some related
logs:
nvidia raid gentoo
#perl
+freenx +no screen +debian
zgrep performance boost
#debian
fdisk cannot open /proc/partitions
#debian
#gentoo
angle-bracket hell
darthlineus
|
|