| |
| |
| |
|
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
Comments:
<0> I see
<0> oh.. I prefer writing SQL by hand
<1> Why did GNU name a project Bayonne? ;)
<2> there's another modules that makes your life easier for handling database data to.
<2> s/to/too/
<0> izut: Albanzo?
<2> CGI::Application has a lot of nice plugins that help you.
<2> in a Perlish way.
<0> cool
<0> Don't have time to learn that now though :(
<2> FillInForm is one of them.
<0> this thing is due by the 30th
<0> cool, i'll look into it
<2> rutski89: oh
<0> Just finished planning this morning
<2> check CGI::Application::Plugin::*
<0> and set up apache like 2 hours ago
<2> what are you doing
<0> i should start coding, but instead i'm just procrastinating :-/
<0> izut: A billing system for a small SAT tutoring company
<0> Ironic since I dropped out of school in opposition of such things.
<2> rutski89: you can make it funny if you try other framework
<3> I have a large set of pseudo-hash data structures ( $foo{a-z}{bar-zab} ) and I'm getting warnings that pseudo-hashes are depreciated... Is there a better data structure to convert to with multiple layers of depth with text identifiers?
<2> It is not hard to learn.
<0> izut: make it funny?
<2> hrm
<2> not funny
<2> sorry, I meant...
<2> enjoyable?
<0> izut: oh, no; I love coding. There's just so much of it to do that it's overwhelming
<2> heh
<0> I should probably break it up into smaller pieces and give myself 1-2 day deadlines for those
<4> How can i read a certian number of bytes from a file.
<0> izut: the money is a great motivator too :) Although I'm probably not getting paid enough
<2> ok
<2> well, good luck then
<0> does anybody ever get paid enough?
<0> Say "I" if you don't get paid enough.
<5> cyrus__: perldoc -f read
<6> I get paid enough. :D
<0> jeek: hehe, cool :)
<0> jeek: what do you do?
<4> rindolf - thanks
<6> net admin
<7> Contract murder.
<2> heh
<5> What happened to buubot?
<2> I can ***ume that I get paid enough, too.
<7> *poof*
<0> Yaakov: hehe
<0> jeek: cool
<2> but I don't like the people who works here :(
<0> izut: :( what do you do?
<2> sysadmin
<0> is everyone a sys admin?
<2> my team ****s
<0> 9/10 people that I know in the tech business are sys admins
<2> well, two of them ****s. I can't do anything because they're older than me here :\
<0> ouch :(
<2> rutski89: I'm doing a Perl presentation too :)
<2> writing
<0> izut: presentation?
<2> hrm
<2> writing some slides for a Perl lecture :)
<2> I think this way sounds better.
<5> izut: Perl presentation about what?
<2> rindolf: perlintro
<0> ahh, i see
<0> for who?
<2> for interested people in my company.
<0> ahh, ok; neat
<2> :)
<0> izut: what kind of company?
<0> please don't say porn
<2> hrm
<2> I wish it was.
<0> lol
<2> it could be funnier :)
<2> a public company.
<0> define public company
<0> what do they do?
<2> data processing company of Rio Grande do Sul
<0> data processing?
<2> hrm... it is owned by State government
<2> TI company of State.
<0> ahh ok; cool
<2> s/TI/IT/
<0> s/TI/IT/?
<0> ytea
<4> rindolf - another quick question if you don't mind. When I read, say 4 bytes from a file (00, 00, 10, 34). This corresponds to the decimal value of 4148. How can I print that out. If I just call print on the variable I read to I get four @
<0> s/ytea/yea/
<2> not so cool.
<0> izut: why not?
<2> bah, too much burocracy(?)
<8> is there a way to check which namespace a variable is in?
<0> izut: yea :(
<2> rutski89: do you work for yourself?
<1> pravus: that's sort of a meaningless question
<8> hobbs: well, i'm using do() and setting a variable within the file that i p*** it
<0> izut: well I'm only 16, so I don't know yet. That's my goal, and I got my first gig a month ago. So I guess I can say yes, but I don't want to say yes until I've done like 3 successful jobs to prove it.
<8> can't it iterate over %:: or something?
<0> pravus: clever
<2> rutski89: nice. I wish you success in your journey.
<8> but does it work?
<0> izut: thanks :)
<1> pravus: I'm still missing the "why" here
<1> pravus: and the "what" for that matter
<0> pravus: well if you just looping over the name space's symbol table then I don't see why not
<5> cyrus__: perldoc -f pack, perldoc -f unpack
<8> give me a sec to explain more...
<9> is it possible to put the string returned by a function in a variable and replace occurences of a character by another character in a single line of perl? (instead of an ***ignment line followed by a substitution line)
<10> sure
<10> (my $string = function()) =~ tr/a/b/;
<9> ah ok, the left side can be an expression
<9> cool, thanks
<1> an lvalue expression, anyway
<11> "pravus" at 72.18.170.71 pasted "do() stuff" (21 lines, 256B) at http://sial.org/pbot/17269
<8> hobbs: i think that might explain what i am doing in a nutshell
<1> fortunately for you, ***ignments in perl are lvalues for just that sort of reason
<9> but was is the result of the whole expression? the substituted string?
<1> datrus: no, the return value of tr
<9> so if i want to do a trim on the substituted string, i have to do this on a second line?
<1> datrus: would you please stop counting semicolons?
<9> it's just out of pseudo-theoretical interest
<12> hello, using HTTP::Proxy; how can i deny all, but one client ip to use the proxy server? also how can i deny all but one site which the clients can connect to using the proxy?
<5> datrus: http://perl.org.il/pipermail/perl/2005-August/007304.html
<10> perlbot: tybalt89
<13> Rick's website that contains links to ws and RicksWM: http://home.pacbell.net/rklement/
<4> rindolf - I read 4 bytes from a file (in hex: 00, 00, 10, 34) which should be decimal 4148. I used pack("I", $bytes) and it just printed out nothing. Shouldn't that pack command take those 4 bytes and convert to an integer value
<5> cyrus__: I think you need unpack.
<14> Hi can aanyone tell me how i can say and like && in a regex like i want to say if ( $foobar =~ m/bird && fish/) { print $foobar }
<5> souny: in your case it would be /(?:bird.*fish)|(?:fish.*bird)/
<5> souny: but it doesn't really scale or work well.
<1> souny: /bird/ && /fish/
<1> souny: problem solved ;)
<14> rindolf: so what should i use cause i want to find lines that have bird and fish but only bird and fish
<15> i need to write a perl script to create a zip file
<16> souny: Might be sufficient to just use two RE's with && between. More readable that way...
<14> so nothing like birdy or fishy
<14> or birdunaa
<15> i had a look at http://search.cpan.org/~smpeters/Archive-Zip-1.16/lib/Archive/Zip.pod
<17> doubtm's url is at http://xrl.us/mk29
<15> however i want to use the default modules provided by perl
<15> and i do not want to install anything extra
<15> is there a way out?
<1> doubtm: well then have fun reinventing some wheels!
<1> doubtm: why are you here? ;)
<15> i was just thinking if i could avoid that
<15> thanx neways
<14> hrmm if ($foobar =~ /bird/ && /fish/ ) doesnt seem to work
<1> ... learn perl? :)
Return to
#perl
or
Go to some related
logs:
hack videosdemsn
#perl
heartbeat on qmail
SYN_SENT netfilter
disable ip3945
nvidiafb AND tvout
#python
#gimp
howto enable 4gb memory debian 2.6 kernel
colinux system.map
|
|