| |
| |
| |
|
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> no
<0> why would that fail?
<0> they're both strings
<1> of course "-" == "-" wouldn't fail either :)
<2> Hmm. Does Perl have ===?
<0> Fructose: perl doesn't have a notion of char and char* like C, the difference between "" and '' is in interpolation of variables
<0> and meta chars
<1> Fructose: fortunately not
<0> ===?
<1> simcop2387: PHP's "identical" operator
<3> '' is char, "" is char *
<4> ACiDWaT: NO
<5> ACiDWaT: ...
<3> in the C
<1> don't mind ACiDWaT, he's never said anything that made sense since he's been here
<6> ACiDWaT: \"" and \'' are char *
<5> ACiDWaT: We aren't talking about C, are we?
<4> Yay! I win!
<3> ok we are not talkig about C
<7> hia ll
<7> how do I format a number into a fixed width string? e.g. 1-> "001" , 4->"004", 15-> "015" 101->"101" etc?
<4> Gah. How do you construct a PRD token that can match anything.. but doesn't..
<4> spundun: sprintf
<5> spundun: sprintf "%03d", 1;
<7> thanks
<5> Free fish, get your free fish here
<8> Hello gentlemen
<2> What would local $/ = undef; do if it's never used again?
<5> Oh, my mom just cashed a $200 check I wrote her a month and a half ago
<5> THANKS MOM
<8> :P
<4> Whiny bitch
<5> Fructose: $/ changes readline behavior
<8> :O
<9> $/ changed my life
<2> Where can I read about that?
<5> perldoc perlvar, search for "INPUT_RECORD_SEPARATOR"
<9> perldoc perlvar
<1> buu: say what?
<4> Hey, nifty
<4> My PRD works
<4> Almost
<4> The problem is I have a section that can contain literally anything
<5> I hate when you clean the dust out of a fan, then it starts making noise =(
<4> So how do I match it?
<1> buu: /(.*)/ ?
<5> buu: Know the length before?
<5> "The next 250 bytes are going to be ANYTHING"
<4> revdiablo: Nope =[
<4> hobbs: There are matches after it =/
<10> yep, '$/ = undef' on line 732 of a huge module can really change your life
<1> buu: huh?
<4> complete: /(\d+)/ /\[(..?)\]/ /(\d+\.\d)\%/ '24 season 1' /\((\d+\.\d+ ..)\)/ 'ETA:' /(\d+)h/ /(\d+)m/
<4> The '24 season 1' bit can be anything
<11> how can I find the current time in seconds since the epoch?
<4> jorvis_: time
<5> buu: '[^']*'
<4> eval: time
<12> buu: Return: 1138940821
<4> revdiablo: Er, no, '' denotes literals in my PRD grammar
<2> Is -B faster than doing a regex for non-printable characters on a couple of lines?
<4> Come on now, if it was so trivially delimited in my actual problem would I be asking this question?
<5> buu: Blah blah blah
<4> Fructose: What is -B?
<2> buu: Binary detection
<2> Doesn't work on stdin, though :(
<11> buu: is that platform specific?
<1> buu: /./(s) would work if nothing else
<4> jorvis_: What?
<4> hobbs: Oh really..
<11> oh, nevermind
<11> sorry
<4> hobbs: Nope =[
<1> buu: be slow as hell though, so with any luck there's a better way :)
<4> It failed to match.
<1> buu: it shouldn't. dump the trace?
<4> MEh
<4> Too much effort
<13> then its too much effort to fix your problem for you! ;p
<4> Yes.
<5> I think we know the lesson here: never try
<1> buu: actually I guess you have to declare "character: /./" and then match character(s)
<1> buu: or since you know that the next thing after your doodad is a space, you could do "word: /\w+/" and then match word(s /\s+/) or something like that
<4> hobbs: Now *thats* a lot of trace output
<1> er... replace \w with \S :)
<1> that would reduce the number of recursive calls, because you commit to a whole "word" at a time
<7> !pastebin
<7> pastebin?
<1> spundun: read the topic
<14> perlbot paste
<15> Paste your code and #perl will be able to view it: http://sial.org/pbot/perl http://dragon.cbi.tamucc.edu:8080 http://erxz.com/pb
<4> Bye bye you cheap cunts.
<8> buu wtf?
<11> wow
<16> cheap? you must be rich.
<4> Daveman: I beat it
<17> "Spundun" at 66.180.175.30 pasted "I am trying to batch change p***wds but this simple script is not working" (23 lines) at http://erxz.com/pb/537
<4> spundun: You're infected with cancer.
<7> buu: why? what do you mean?
<4> Awesome, I can order cialis AND viagra!
<4> spundun: You're going to die!
<4> Bhwhahahahaha
<18> whats perl6?
<16> spundun: unchecked growth of cells = cancer
<4> You don't want to know.
<1> spundun: p***wd is smarter than you
<7> ok.... does it have anything to do with the question that I pasted?
<13> Jivrey: you know those make believe stories your parents tell you?
<1> spundun: i.e. it's smart enough not to let you do that
<1> spundun: hrm, nevermind. Yours isn't :)
<7> hobbs: ok... so how do I change p***wds of the 100 users that I just created? I specified the p***wds with adduser -p <p***wd> option but apparently I was supposted to ecrypt them
<1> spundun: it's just that your system won't accept the p***word you chose because it's too weak
<7> hobbs: actually i can specify the same weak paswd on commandline and it works... its just not working with perl
<19> What regex will match and save the month and number and day from this Thu Feb 2 23:40:59 EST 2006?
<19> ?
<11> which number?
<19> the 2
<19> so i want it to save Feb and the 2
<11> but not Thu?
<19> nope no thurs
<20> then you gave a crappy description!
<11> $date =~ /^\w+\s+(\w+)\s+(\d+)/
<19> thanks jorvis
<11> or just use a split on whitespace and pull of the ones you want.
<7> hobbs: yeah the bad p***word warning probably threw you off..that was just a test username
<20> or use localtime() instead
<11> yeah, or that
<7> hobbs: its the same with a goo p***word also
<20> which sounds strangely like the question someone asked yesterday
<11> I ***umed he was parsing it out of something
<20> jorvis_: qx(date) :)
<21> what module would you use to minimize a perl/tk app to the tray?
<22> Hrm
<22> to push something into an array
<22> is it..
<22> uh
<22> I forget
<22> anybody know? :\
<13> push()
<16> push()
<13> pravus I win ;)
<23> lean_forward_on_your_hand()
<16> nein!!
<16> my keyboard ****s!
<23> sub lean_forward_on_your_hand { push() }
<7> So is there any way to change a 100 users' p***wds ?
<16> spundun: yes?
<23> spundun: to what?
<23> different things?
<7> adu: yeah..
Return to
#perl
or
Go to some related
logs:
emerge-xdm
Connection refused+Terminal-Server-Client+linux
bitbake berlios
#css
shores algorithm
bitmap 16*16 db
madwifi in ubuntu 6.10
ubuntu fsck bread:
#css
eaglex documentation
|
|