@# Quotes DB     useful, funny, interesting





Google
 
Web www.quotesdb.info
Undernet  |  EFnet  |  Quakenet  |  Freenode  |  Dalnet  |  Ircnet  |  Galaxynet
Page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30



Comments:

<0> BinGOs: Return: ['2','4','5','a','b']
<1> cfedde: I turn into something unimaginable at night, so I can't share.
<2> Insolit: nope!
<3> Yaakov: :-)
<3> you win.
<4> re
<5> Yaakov: collect the three golden spheres of hash array scalars and bring them to the top of mount chomp() and you will be cured
<1> gorpon: Oh, all and all it is fun. I just can't let any Earth humans see me or they go catatonic, permanently.
<2> Insolit: there's a reason you have to know what your data values are and compare them appropriately (and thus there is no "generic comparator" in perl): because perl conflates numeric and string values by calling them both "scalar"
<3> for 10 bucks I'll get my own room.
<1> (With a smile on their face, I might add.)
<4> PerlJam: i have to let the user define regexs which are supposed to modified network packets :/ thus i have to validate them
<1> cfedde: SSV is the PARTY DORM
<1> 802.11 too!
<6> Arguably the best part about IPC is the terminology - it's not often you get the chance, in all seriousness, to talk about killing your childern and reaping them before they turn into zombies. Or at last I hope not.
<3> do I need to get a food card?



<2> felixxx: eval then
<7> hrmm
<6> pings everyone and leaves... hmm..
<1> HELLO THRIG
<8> Is there a builtin equivalent of a member or member-if for perl?
<9> a member of what ?
<8> Member of an array.
<10> I've done it!!! CGI_Lite is mod_perl 2 compatible now :-)
<11> hi
<12> Hi there. I'm thinking off writing a log monitoring system in perl. Now, I'm going to have a main perl script that starts scheduled scripts. I may want to take down and restart these script, say, via xml-rpc. Is there 1) a CRON-like package for Perl? 2) A package for monitoring processes/scripts?, and 3) would it work on both linux and windows? :-)
<12> Any insight would be appreciated!
<7> sounds like a reinvention of several other things
<13> maildir > mbox
<12> thrig, Yes, but still a thing that must be done at work :) We have a log-server that needs to be feeded
<12> I was thinking perl would do the job
<1> gr00ber: poe.perl.org
<7> does swatch or sec.pl and so forth not suit this system?
<3> who is arriving for YAPC at say 3:00pm on sunday that I can share a ride with?
<1> cfedde: I haven't made my travel arrangements yet.
<1> cfedde: I am probably taking the train, though, so it wouldn't matter.
<3> start soon. I have $190 round trip from denver to midway.
<9> heath: there isn't a 'built-in'. But one could use either perldoc -f grep or List::Util::first
<14> grep. To access this perldoc please type, at a command line, 'perldoc -f grep'. You may also find it at http://perldoc.perl.org/functions/grep.html
<9> if ( grep { $_ eq 'foo' } @array ) { # do something }
<8> BinGOs: Sweet, thanks.
<8> I thought that I was going to have to write my own.
<2> heath: such a thing is so trivial to write anyway
<8> PerlJam: Yes, but I wanted a quick quickie, and I couldn't beleive there wasn't something out there already.
<3> maybe even use List::Util 'first'; if (first {$_ eq "foo"}) {...}
<12> cfedde, sec.pl ?
<3> gr00ber: ?
<12> what is is?
<3> gr00ber: go fish?
<12> i'm allergic to salmon
<3> gr00ber: I'm not understanding your question.
<12> did sec.pl relate to my question?
<7> no! pay no attention to existing tools!
<12> i'm not familiar with sec.pl, so if that can help, I'll pay double attention
<3> gr00ber: perhaps you have me confused with someone who knows what you are talking about.
<15> If anyone has coded Bentley-Ottmann or Shamos-Hoey in Perl - pls pvt me.
<12> cfedde, that may be the case indeed, dude
<12> Yaakov, poe.perl.org... why would that help me with my task?
<12> appears to be a generic framework
<1> gr00ber: It is an event-driven, widely supported environment with some things already written like what you want.
<16> you want OS like functionality.
<16> perl is not an OS
<12> Yaakov, right. And it is as portable as perl?
<12> no linux/win32 specific crap?
<1> I don't know of a platform it doesn't work on.
<1> It installs on Linux, BSD, OS X and Win32.
<12> nice
<3> POE is perl!
<16> it's not as supported on the model 100
<12> :)
<3> it pretty much runs wherever perl runs
<1> doug: I will have to test that, as soon as I port perl to my 100.,
<12> OK. So POE installs as a module or something, and then I do some magic stuff in my app, and voila - I can drop in components?
<1> Or maybe my 102.



<3> Yaakov: you have one of each? I just have the model 100
<17> previously someone mentioned as a possible code to merge arrays: "push @array, grep { my $el = $_; ! grep { $_ eq $el } } @array;"
<1> gr00ber: Sorta like that... but you left out the pain and the bleeding ears part.
<16> 102 is better
<3> newer.
<1> cfedde: I have two 100's and a 102.
<3> Yaakov: rock on!
<17> what does that second grep does?
<17> *second does=do
<1> I have the floppy, too.
<16> and the acoustic coupler?
<3> Yaakov: I have a floppy and "traveling software's" Ultimate Rom!
<1> cfedde: I have the two.
<1> that too.
<16> that's a good rom
<1> doug: It has a modem built-in.
<3> It was good stuff in it's time
<1> Direct connect.
<1> I have the cable.
<3> apparently hte D key is stuck though.
<16> yeah, modem's built in, but no way to connect it w/o that cable or the cups
<3> It had a really cool external bus. Lots of programmable pins controlable form basic, or.. Forth!
<1> I also have a printer cable.
<3> I wrote a termcap entry for it.
<12> hm, I need a cron module for Perl. Know of any?
<7> POE?
<3> gr00ber: I wrote one for POE
<3> it might do what you want it to do.
<16> i got like a 2-liner that'll do the same
<6> i just felt an earthquake
<18> hi all
<18> is in perl allowed
<18> the use of the constant NULL ?
<17> is it possible to comment several lines without using the "#" for each one?
<19> C-space M-x comment-region on emacs :)
<20> press V, move around to mark lines, then press I#<esc>
<20> (vim)
<18> no one know if is possible to use NULL ?
<18> for example $var = NULL ?
<20> Roman-Pierce: what is NULL?
<18> the NULL constant
<18> in C it exists
<20> there is no NULL constant
<20> in C it's a macro for 0
<17> Roman-Pierce: undef
<21> you dont need one in perl
<18> i saw this script on internet
<18> on a tutorial
<21> if you wanted to "empty" a variable you could just do $foo = ""; but then you should probably be using scoping anyway
<18> my %event=(
<18> 'EventID',100,
<18> 'EventType',EVENTLOG_WARNING_TYPE,
<18> 'Category',NULL,
<18> 'Strings','This is a String',
<18> 'Data','THIS IS DATA',
<21> scripts on the internet ARE ****
<18> );
<18> and at category he uses NULL
<21> because he's an idiot
<18> bu the code works ...
<18> *but
<21> george bush "works" but he's an idiot too
<20> Roman-Pierce: does the script use strict;?
<18> nope
<20> then the author is an idiot
<18> ok so if i would like to check
<18> if a variable is blank
<18> what will i use ?
<18> i i use $var = "";
<20> if ($var eq "")
<18> i get a warning ..
<18> instead if i use
<21> see, you should probably never need to do something like $foo = "" in the first place
<18> $var == NULL


Name:

Comments:

Please enter the result of the sum 63 + 46 (to avoid spam):






Return to #perl
or
Go to some related logs:

#gentoo
#centos
click speed+xorg
howto ghostscipt cups
popeuser
KDC_ERR_S_PRINCIPAL_UNKNOWN cifs/domain
howto snmpd fedora traps
#math
#ubuntu
jigajoule



Home  |  disclaimer  |  contact  |  submit quotes