| |
| |
| |
|
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 31 32
Comments:
<0> -T isn't in my perl vocab
<1> $ == (?=\n?\z)
<2> Picard is doing that thing where he randomly executes crewmen again.
<3> sweet
<4> *blink*
<0> i should go back to school
<0> or something.
<5> sili - learn Korean.
<0> ayrnieu: why?
<2> sili_: No you're too stupid to do it.
<0> buu: i know, i'll just drop out again
<4> do { local $/ = "\0"; <FLOPPY> }; # I love perl!
<5> sili - your question confuses me.
<2> sili_: Excellent.
<2> integral: FL00PPY.
<0> buu: but it turns out that i earn more than fresh graduates earn
<0> so it's like omgwtf
<2> sili_: Yeah.
<5> although, who cares about fresh graduates?
<0> it also turns out that having a degree doesn't mean much
<3> eval: while(1) {$a = 1.0/3.0;}
<6> Killing 1244 due to run time
<5> sili - 'having a degree' is just the new baseline.
<4> seek FLOPPY, 2*512 + 0x12, SEEK_SET; do { local $/ = "\0"; <FLOPPY> }; print FLOPPY "$menu_start+$menu_length\0"; # how to patch the location of menu.lst on a grub boot floppy
<3> hmm.. so mommy kills it.. not the rlimit then.. odd
<0> ayrnieu: the intern who just got his BS in CS doesn't know HTML
<4> I hate the way everyone devalues underwater basket weaving degrees.
<2> JohnQ: Apparently.
<5> sili - indeed. 'baseline' only in terms of 'weeding people out'.
<5> sili - oh, we have one billion applications. Well, how many of them have degrees? ... oh, one billion. Darn.
<2> **** it's late again.
<2> ayrnieu: Oh noes, save captain picard from the evil witchunters.
<5> in any case, my dad makes un****ingbelieveable money in IT and he has a lifetime of geekdom and one enlistment under his belt. So, my fears of the almighty university degree : nonexistent.
<2> ayrnieu: What does that have to do with a degree?
<3> eval: $x = "Hello"x4000000000;
<6> JohnQ: Error: Out of memory during string extend at (eval 126) line 1.
<3> eval: $x = "Hello"x40000;
<6> Killing 1247 due to run time
<0> i need to get hired at fortune 500 company doing something that sounds good, even if for a short time
<0> that will help.
<3> eval: $x = "Hello"x4000;
<2> sili_: I kind of want to work for a university.
<6> JohnQ: Out of memory!
<5> sili - help with what?
<0> buu: research monkey?
<4> British American Tobacco! Lots of money still in that industry
<0> or teacher, ***istant...
<2> sili_: Something like that
<2> sili_: Eh, I think I need a doctorate or masters for teaching.
<3> eval: fork
<6> JohnQ: Return:
<2> eval: fork; $!
<6> buu: Return: Resource temporarily unavailable
<0> buu: or you could just be a l33t mother ****er and get paid for that
<5> sili - what will 'getting a flashy job at a fortune 500 company for a little while' help you with?
<2> sili_: Yeah that's the idea.
<7> hmm... how would i go about figuring out the the number of days in the current month, and furthermore, how many days left there are?
<2> x86: Time::Local! Date::Manip! Scary date modules.
<0> ayrnieu: for future applications. it seems most people say "o0o, he worked at IBM"
<0> for example.
<8> I worked at Freightliner!
<0> just in the meantime, though. i don't care for working for other people
<8> They make trucks.
<5> sili - padding CVs is too much trouble for too much lame.
<8> vroom, vroom
<9> I am playing around with regex and have stumbled accross the /1, where I can check for dupliate words etc. However this does not work I use this if ($str =~ /test of a \1/) {
<9> $str = 'test of a test';
<0> i like my current place though
<0> they treat us well
<9> any reasons why this is failing with Reference to nonexistent group in regex; marked by <-- HERE in m/test of a \1 <-- HERE / at ./test.pl line 5.
<5> crypt - perldoc perlre, read about capturing and groups and whatnot. Or just read 'perldoc perlretut'.
<5> crypt - the basic answer is "you do not know what you are doing".
<9> ayrnieu, exactly, thats why I am asking
<2> Now picard is quoting poetry at people
<5> or, "you don't understand something so basic that you should just go away and read a tutorial".
<0> argg i need to get this programming language right
<8> eval: my $str = "test of a test"; 42 if $str =~ /(test) of a \1/;
<6> ew73: Return: 42
<9> I am reading a book at the mo and it goes over it slightly...was just interested thats all
<0> ayrnieu: source code generation or runtime evaluation in perl?
<1> crypt_ex: perldoc perlretut
<10> The perldoc for perlretut - Perl regular expressions tutorial is at http://perldoc.perl.org/perlretut.html
<9> okay ta
<5> crypt - but anyway, ew73 answered you and you now understand :-) Good luck with the book.
<2> I like how these trials don't bother with adjudication or time limits or protocol or anything resembeling that.
<8> Not only did I answer, but I used icky perlish syntax to do so!
<9> ah I get it....needs to be in brackets ;)
<2> Yay!
<2> Icky perlish syntax for the win.
<9> ayrnieu, that was the problem I was experiencing after after all ;)
<0> recently i've discovered that do{} is a lot of fun
<5> crypt - the brackets aren't the issue so much as what the brackets mean, and likewise what \1 or \2 and such mean. But OK.
<0> my @foo = do {... long and ugly stuff that doesn't need a function ...}
<2> sili.do{ $^a <+> $^B }
<0> no!
<1> http://www.jerkcity.com/jerkcity2352.html
<9> ayrnieu, in the same sense when in the if the catchment goes in $1, but in the pattern you can use \1, now I get it
<9> thanks all.
<4> wow! my patch script works!
<5> crypt - yay
<9> ayrnieu, thats all I wanted to know :)
<0> mauke: any take on source code generation vs runtime evaluation in perl?
<0> (for AST type things)
<1> huh?
<0> i have a tree
<0> and it needs to be evalutated
<0> i can either walk it and produce perl code then run that, or i can just evaluate it sorta like lisp
<1> how often do you need to evaluate it?
<4> the former is faster, the latter is easier.
<0> mauke: some more often that others
<1> I don't think eval is fast
<0> it won't be an eval()
<11> hmm
<4> oh, I was thinking eval like: $cv = eval "sub { generated_code_here }"; while (tight_loop()) { $cv->() }
<1> how do you run the perl code?
<0> i'd write code to a file and do$file or something
<1> that's even slower
<11> Can't use an undefined value as an ARRAY reference at Board.pm line 46, <NAMES> line 258.
<11> line 46: return 0 if(@{$board{$x}{$y}} > 2); #More than two humans already.
<0> $board{$x}{$y} is not an aref
<11> $board is being set up in the subroutine that I'm currently making
<11> I mean, pasting
<1> there is no $board in that code
<12> "crapweasel" at 82.168.141.105 pasted "Board initialisation subroutine" (14 lines, 392B) at http://sial.org/pbot/16581
<1> GumbyBRAIN: homophobes are words which sound the same but are spelled g-a-y
<13> mauke: But there is a sound one.
<11> %board is being set up, I mean
<1> heh, did you override CORE::log?
<11> no, log is exported by my Logging module
<11> but that's a detail, I think
<11> (I hope it doesn't matter)
<0> hmm i need a web designer
<11> lol
<11> that depends
<11> i'm not good at making beautiful websites, but I can make the HTML code behind it
<0> weak.
<3> buu.. I cant seem to locate the code in eb which kills runaway children.. IE, i cant find where it prints "Killing $pid due to run time" ... what am I missing?
<11> did someone see what I did wrong in my code?
<11> @{$board{$x}{$y}} gives an error about Can't use an undefined value as an ARRAY reference at Board.pm line 46, <NAMES> line 252.
<11> so $board{$x}{$y} is not an array reference
<11> after trying to move to tile X1Y0.
<11> so $x is 1 and $y is 0
<11> so $board{1}{0} doesn't exist
<11> Ohhh!
<11> Ofcourse!
<11> http://sial.org/pbot/16581
<11> in the second run of the outer loop, $x is 1, but $y is still $maxy
<1> and that's why you use for loops
<5> crapweasel - zip two 1..$n lists together for your pairs.
<11> probably
<11> well it works now
Return to
#perl
or
Go to some related
logs:
apt-get install ubuntu OLE.pm
#mysql
optional repos
+etch +QM_MODULES
#php
undefined symbol: avcodec_init
fedora resolv.conf overwritten by dhclient
#centos
for delimns= escape
#gentoo
|
|