| |
| |
| |
|
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> cool
<0> I'll take a look
<1> Learning Perl is worth a skim, even for those people.
<0> "think they're smarter than they are"
<2> merlyn: i only found some of the exercises to easy in your book
<1> if you skip the exercises, you can read Learning Perl in about 10 hours
<1> and intermediate perl is about the same
<1> with exercises, both books are about 25-35 hours
<3> 25 hours I don't have that kind of time to learn something new!
<1> yeah - writing good exercises is tough
<1> I don't claim to be very good at that.
<0> you should write up a pamphlet of good perl interview questions... from easy to hard
<2> i sincerly believe you. but, how one experiences an exercise is different for everyone
<2> although i found the exercises with the regex quite hard
<0> I'd buy it
<1> did you have 3rd or 4th edition?
<4> GumbyBRAIN: ***
<2> the newest
<5> simcop2387: The gods who live at home and never had ear ***.
<0> wouterrr: regex's require some time to get used to them
<1> 4th?
<2> 4th i believe
<2> 4th edition it is.
<1> well - you said "the regex section"
<1> there are 3 regex sections. :)
<2> a little language on its own
<1> and yeah, that's always a bit tough. it probably deserves expanding a bit more.
<2> if i recall it correctly from your book
<1> the problem is that a lot of people come from other places, and so for some, regex is trivial.
<0> I don't think regex's are something most people can really understand without actually using them for a while
<1> it's hard to pace that correctly.
<2> (/me throws away the 30 (printed) pages of perltoot)
<2> pity
<0> most other things have fairly strait parallels in other languages
<2> merlyn: this may sound like a dumb/stupid question to you. But, is it still advisable to learn perl? I mean, with languages like Python and such
<6> merlyn - are you going to be a freenode regular now?
<1> if you have to ask that question, don't ask it here, wouterrr
<2> no, i like perl
<2> but will perl still exist in, let's say, 10 years
<0> python strangles the life out of you
<7> aptly named then :)
<2> because every people who i know and i tell them i'm learning perl they start bashing it
<2> and say i should learn python instead
<1> L-R - not sure. So far, this has been far more pleasant than my recent experiences in magnet#perl
<8> well, perl didn't stop evolving the momemnt python sprung into existence
<6> ok - fair enough
<1> Perl gets bashed because it gets a lot of bad press.
<0> python is extremely slow
<1> but in truth, it's still the heavy lifter for most of the internet.
<8> merlyn: so it gets bashed because it gets bashed?
<1> Yeah, it's self-circular bashing
<0> Hinrik: herd mentality
<2> but i don't know enough of perl to defend myself ;-)
<1> "perl is write-only"
<1> no - there are some write-only coders that use Perl
<0> wouterrr: why do you feel you have to?
<1> good perl is plenty readable
<2> eh, because they are bashing it :- P
<0> wouterrr: so?
<2> i feel i have to do something against that
<0> Them: "perl ****s!" You: "ok"
<1> explaining perl is like the blind people explaining the elephant
<1> and some people aren't comfortable with that
<3> I inherited some code from a guy that *loves* using &&.
<0> perl is too flexible for many people. it scares them.
<1> double background@!
<0> I consider them cowards :-)
<1> "with great power comes great responsibility"
<0> let's try to not get our philosophy from comic books, ok?
<1> they fear reading someone's code that they won't udnerstand
<9> the biggest complaint (write-only) is kind of irrelevant in many cases, too. I hear complaints that "it's too hard to maintain, if my programmer's leave, I can't maintain their code." But the point is, *other Perl programmers* *can* maintain it, and if they can't, they can't call themselves Perl programmers.
<1> the answer to that is "read more of randal's books"
<3> No! $dbh->prepare(..) && $sth->execute(..) && do { $sth->fetchrow... }
<9> that argument is totally fallacious.
<1> yeah infi... I can't read greek either
<0> ew73: you could do that in C
<9> do you hire a web tech to work on your car?
<6> I unplugged yesterday. Other than "Bugs" - were there any 2006-04-01 pranks?
<0> big woop
<1> that doesn't mean greek is write-only
<0> bad code is bad code
<9> do you hire a plumber to paint your house?
<9> etc.
<6> oh, I guess larry had a $ joke too
<1> do you hire a plumber to bug a hotel room?
<3> rmah: That doesn't make me want to stab the author any less.
<9> do you hire a 22-year-IT veteran to be City Manager of Tuttle, Arkansas?
<0> ew73: I fail to see what perl has to do with that bad code though
<0> infi: haha
<10> infi: well these technical geeks have too much time on their hands
<1> I fail to see what Perl has to do with the price of tean in CHina
<1> tea in China
<1> never blow the punchline
<11> given @a = [1 => 'a', 2 => 'b']; how do i get at @a? I'm trying to use HTTP::Headers::Util qw(split_header_words);
<1> Ugh
<1> you got @a = $single_value
<1> did you really mean that?
<11> hm. got that from the man page.
<0> kensanata: your code is wrong
<1> no you didn't :)
<10> kensanata: what man page ? :))
<11> SYNOPSIS
<11> use HTTP::Headers::Util qw(split_header_words);
<11> @values = split_header_words($h->header("Content-Type"));
<11> HTTP::Headers::Util
<1> That probably means it returns a list, not an arrayref
<0> that doesn't look like "@a = [1 => 'a', 2 => 'b'];" to me
<2> merlyn: thanks for your help, i'll continue with learning perl
<12> kensanata: arrays are initialized with () bytw
<1> Why are you calling HTTP::Headers::Util?
<11> i want to get the charset of a HTTP::Response
<1> I've written huge amounts of Perl code for the web, and haven't ever seen that webpage. :)
<0> he's 733t
<0> 133t I mean
<1> where's the charset normally?
<0> or whatever
<1> it's in content-type, right?
<1> wait... $h->content_coding
<0> you are (as always) correct
<1> isnt' that waht you want?
<11> $response->header("Content-Type") is something like text/html; charset="iso-8859-1"
<1> or $h->content_langauge
<0> oh, HTTP::Headers finds that for you? how convenient
<1> ahh... just split on ";\s+" then :)
<11> merlyn: isn't that gzipped, conflated, etc?
<0> kensanata: most likely the module finds that for you already
<1> Yeah, sorry, looking at the wrong thing
<11> rmah: i'd be happy to learn how to! :)
<1> see LWP::Charset
<1> returns the charset info of the response
<11> HTTP::Response only seems to provide $r->header()
<1> in the CPAN
<1> I knew there wa a lazy way to do this. :)
<0> kensanata: HTTP::Message
<0> the charset method
<1> Oh, that's even easier
<1> why is there LWP::Charset then :)
<0> or maybe not
<0> I don't know, I don't do perl
<11> rmah: uh, where did you find that?
<11> my HTTP::Message only has $r->decoded_content()
<1> right. mine too
<11> and i see in the source that it has a my $charset...
<11> but that is not available from the outside.
<11> :(
<1> ok back to LWP::Charset :)
<11> merlyn: i guess so, unless somebody tells me how to get at the correct info from the array.
<11> which i seem to be too stupid to do.
<1> see how LWP::Charset does it
<1> can't be hard
<11> yeah, will do that.
Return to
#perl
or
Go to some related
logs:
gentoo configure trackpoint -gnome
libssl.so.5: cannot open shared object file: No such file or directory
#perl
#linux
kubuntu xine pre-compiled
#javascript
#css
suse-gnome smart repo
tightvnc connection refused 111
#dns
|
|