| |
| |
| |
|
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
Comments:
<0> what's arguable?
<1> merlyn: line discipline surel?
<0> "surel"?
<2> Whether it's safe to ignore redefintion warnings.
<3> PerlJam: I'm doing 'open(MAIL,"| sendmail blah@blah.com"); print MAIL $1; print MAIL $2; close(MAIL);
<0> Yes - generally, redef warnings are sensible warnings.
<1> merlyn: "surely" by typed over a laggy link
<4> notwoggle, it seems to work now
<0> ancker - don't send mail that way
<3> the print MAIL $2; is being ignored
<5> don't ignore warnings unless you fully understand why you are being warned and what the implecations are
<6> ancker: use warnings; use strict;
<0> and your @blah is being expanded
<0> unless you did \@blah
<1> ancker: you're printing headers?
<0> or didn't use double quotes
<1> ancker: you have appropiate line endings?
<0> right - are you printing headers?
<1> wtf are $1 and $2?
<1> (why are they not named?)
<6> integral: perldoc perlvar :-)
<2> And if you are using a traditional sendmail you probably shouldn't be putting the to address on the command line to sendmail.
<0> $1 = unit of money in the US
<0> $2 = twice that amount
<3> integral: that was an example, that's not exactly what I'm sending
<3> hang on, i'll pastebin
<7> ancker: we can't help debug your imagination
<0> well - we can. but it takes work
<8> hello everybody, anybody knows how could i locate a string in all text files of my system please ?
<1> ancker: so that was a completely bloody pointless invented waste of bandwidth?
<0> is_null - grep?
<7> is_null: maybe grep -r
<6> grep -r foo /
<0> what problem are you trying to solve, is_null?
<7> is_null: or maybe find + xargs + grep
<0> are you looking for a search system for a website?
<0> or just a one-off "find something" search for you?
<1> microsoft and apple both offer search solutions
<9> or maybe: find + xargs + perl? Or find + perl? or perl?
<0> right. you can use apple mdsearch
<8> trying to locat ethe file containing /var/www/localhost as value of apache2 www root, couldn"t find it in httpd.conf neither apache2.conf
<10> "ancker" at 192.17.24.143 pasted "mail script" (52 lines, 1.7K) at http://sial.org/pbot/17211
<1> is_null: look at what files those files Include
<8> interresting, thank you, bbl :)
<3> please dont' critique the code, I realize it shoddy, I'd just like to know why the email is being sent, but the second 'print MAIL' line is being ignored
<0> you strip off the \n just to add them back on most of the time?
<0> that's silly
<9> ancker: note: there is an elsif. if ($lines =~ /^Severe.../) { } elsif ($lines =~ /^Special.../) { }...
<5> ancker: perhaps add another \n after the Subject: line ?
<0> you never check the return of the open either
<7> ancker: how can you hope to get better if you don't hear from experts where you've gone wrong?
<1> ancker: the shoddiness is unrelated to your problems?
<1> ancker: Are you a world renowned expert in perl qualified to make such a pronouncement?
<0> you set $dat to 0 conditionally just before setting $dat to 0 unconditionally
<5> if(1 == $sev) since you are just using it as a flag
<0> this scares me already
<2> ancker: Have you seen perldoc -q "send mail" ?
<9> ancker, push(@page,"$lines" . "\ \n"): no need for the quotes around $lines. $dot = "0"; $dot = 0 is just as good. (even better IMHO)
<3> integral: I don't need to be world renowned to know that it works, unless I pipe it to sendmail.
<0> Oh right. yeah, you're not ending the header
<0> you need a blank line between header and body
<0> and test $? after your close()
<0> or use the RIGHT way to send mail too
<1> hmm, fascinating: I'm next door to the original manuscript of the Westminster Confession of Faith.
<1> ancker: yes, SO IT IS BROKEN. sheesh.
<0> so - test open, test $? after close
<0> and add a blank line
<1> it does not work, ergo it is broken. trivial.
<0> that's the minimum to fix
<11> hi
<9> ancker, if (($dot)&&($lines)) { } : writing if ($dot and $lines) { } is more readable.
<3> merlyn: I don't have the convenience of MIME::Lite or any of the mail modules, I"ve got to work with what I can
<9> ancker, also, why is use strict in comments? And why isn't there a use warnings?
<3> merlyn: and I tried adding a second blank line after the headers, same result
<9> ancker, why are you reading the entire input in memory only to processes it line by line? What about reading it line by line?
<6> Any problem in computer science can be solved with another layer of indirection. That layer of indirection is lambda.
<1> except due to bloody Stroustroup it's a shoddy object system
<7> mauke: so you're saying he should abandom perl in favor of haskell? ;)
<1> mauke: but equally, imagine the unwashed m***es writing speghetti continuations
<12> mm. spaghetti.
<12> I (ab) use them for early returns in scheme atm
<2> integral: Are you blaming Stroustroup for the shoddy part of that or the object system part of that?
<1> subconts are nice for that imho
<1> notwoggle: Both.
<13> \= No manual entry for perlreftut
<6> Control.Monad.Cont.Pasta
<13> arrrrgggghhhhhhh
<1> notwoggle: although at least he didn't try to, say, add object support to APL
<3> Ani-_: because when I first wrote this script several weeks ago, I was told to read it in that way. (by the same people who helping me right now)
<8> thank you all i worked it out, good day :D
<14> is there a way i can make `some command` time out after X seconds?
<2> sneex: What version of perl are you using?
<1> bnovc: perldoc -f alarm
<15> alarm. To access this perldoc please type, at a command line, 'perldoc -f alarm'. You may also find it at http://perldoc.perl.org/functions/alarm.html
<16> bnovc: sure, use alarm()
<13> 5.8.7
<14> thanks
<13> but this is Ubuntu -- so who knows for sure ;-)
<6> install the perl docs
<1> sneex: try installing the documentation.
<13> lol
<1> Or learning how to use your ****ing operating system before trying to program it. sheesh.
<13> \= true
<1> "In the Tripos you don't understand things. You just get examined on them."
<6> just use gentoo!!
<13> lets not and say we did, OK mauke
<1> Minix from Scratch! Build your operating system from floppy driver to chmem(1)!
<9> sneex: http://perldoc.perl.org/
<17> perl -e 'use gentoo;' --> Can't locate gentoo.pm in @INC
<0> perl -Mgentoo
<0> perl '-Mstrict; die'
<18> merlyn, if I undef $a later in my program (like in a loop) then run that ||= again, it should treat it as it does the first time right?
<1> ugh, scope your variable better
<6> perl -eval "-MPerlIO=via;printf'Just another Perl hacker%c '=>44"
<17> merlyn, yah, but -Mgentoo !~ /use gentoo/ which is what I was aiming for
<13> who knew Ubuntu breaks out perl-doc \= It's installed now lol
<17> just like debian
<19> jesus
<19> I just averaged 1500KB/sec on a download
<7> mkrenz: any false value will do
<13> I left Debian for FC
<19> my ISP roxors my soxors
<0> I can't recall the last time I "cleared" a variable in code
<0> I don't know how people get into the habit of needing a variable "cleared". :)
<6> kitchen: perl -e 'BEGIN{push@INC,sub{open my$k,"<",\"1";$k}} use gentoo'
<9> Elly, and you are happy with that? :/
<18> There we go. thanks.
<19> Ani-_: umm yah
<7> merlyn: perldoc -f reset # :-)
<15> reset. To access this perldoc please type, at a command line, 'perldoc -f reset'. You may also find it at http://perldoc.perl.org/functions/reset.html
<19> 1500KB/sec is pretty damn good :P
<3> damn this is annoying
<13> eval: $_ = ''; #cleared now
<20> sneex: Return:
<1> Tip of the day: become mad at 2am; doctors hate doing sectioning at that time
<1> Elly: places like .nl are great for downloads like that
<0> "sectioning"?
<19> integral: I'm not .nl though
<19> I'm .ct.us
<21> GumbyBrain: l'm irving
<22> Wats it bout.
<19> so 1500KB/sec is pretty ****ing good :D
<9> That only depends with what you compare it.
<9> In the end it is just slow
<23> not many sites have 1500KB upload though :)
<1> merlyn: involuntary removal to a hospital for mental health treatment
<0> ahh - I'm not familiar with that procedure
Return to
#perl
or
Go to some related
logs:
#oe
Ubuntu VGA support
X11 disable middle click
gcc hpp with precompiled header
dailup in ubuntu
#web
#ubuntu
alsa-utils circular dependencies gentoo
my.cnf ubuntu external connection
#oe
|
|