#perl
19 October 2007
Total 39 pages. You are browsing page 3/39.
First :: Prev :: [1] [2] [3] [4] [5] [...] :: Next :: Last
01:22 <****> thanks all
01:22 <****> eval: $_="foo(bar)"; s/\(.*/\(//; $_
01:22 <****> Chris62vw: ''ERROR: syntax error at (eval 238) line 1, at EOF
01:22 <****> oops I suck
01:22 <****> how do i perled
01:22 <****> hehe
01:22 <****> you could do it with split and some "*" x length action...
01:23 <****> rajkosto: eh?
01:23 <****> i need 2 perl
01:23 <****> eval: $_="foo(bar)"; s/\((.*)/"(" . ("*" x length($1))//e; $_
01:23 <****> Chris62vw: ''ERROR: 2149: Illegal division by zero at (eval 238) line 1.
01:23 <****> eval: $_='foos ( foos )'; s/(?<=\()(.+)/ '*' x length $1 /eg; $_
01:23 <****> Zoffix: foos (*******
01:23 * Zoffix wins
01:23 <****> hax!
01:23 <****> bastard
01:23 <****>:P
01:24 <****> s/(?<=\()./*/g
01:24 <****> anno-, nope
01:24 <****> That will replace only the first one.
01:24 <****> But I guess, that depends on how you interpret his question :/
01:24 <****> ./Zoffix --inline-eval
01:25 <****> if only
01:25 <****> only the first one? it's got /g
01:25 <****> anno-, yeah, but only the first one will be preceded by '('
01:26 <****> eval: $_='foos ( foos )'; s/(?<=\()[^*]*./*/g; [ $_ ]
01:26 <****> Zoffix: ['foos (*']
01:26 <****> hmr
01:26 <****> oh
01:26 <****> eval: $_='foos ( foos )'; s/(?<=\()[^*]*?./*/g; [ $_ ]
01:26 <****> Zoffix: ['foos (*foos )']
01:27 * Zoffix goes back to $foo
01:27 <****> dd if=/dev/random of=/dev/Zoffix bs=4096 count=10240000
01:27 * CPAN upload: Finance-Bank-IE-0.10 by WAIDER
01:28 <****>) $_=$$foo;
01:28 * bp31416 goes to $duck
01:30 <****> Zoffix,
01:31 <****> tr /(/*/;
01:31 <****> replaces every ( with *
01:31 <****> i want to replace any character after ( with *
01:31 <****> oh, after!
01:31 <****> eval: $_='foos ( foos )'; s/(?<=\()(.+)/ '*' x length $1 /eg; $_ # squall__
01:31 <****> Zoffix: foos (*******
01:32 <****> ..
01:33 <****> squall__ replace s/\((.)/\(\*/
01:33 <****> eval: $_='foos ( foos )'; s/(?<=\()./*/g; $_
01:33 <****> anno-: foos (*foos )
01:35 <****> eval: "my (arona(" =~ s/\((.)/\(\*/
01:35 <****> bp31416: ''ERROR: Can't modify constant item in substitution (s///) at (eval 238) line 2, at EOF
01:36 <****> eval: "my (arona(" =~ s/\(./\(\*/;
01:36 <****> bp31416: ''ERROR: Can't modify constant item in substitution (s///) at (eval 238) line 1, at EOF
01:36 <****> meh
01:36 <****> bp31416, the right side of s/// is not a regex.
01:36 <****> i just wanna eval some ( . Y . ) like patterns
01:37 <****> Hi all...I gotta problem with IPC :(...
01:37 <****> it is described in here: http://perlmonks.org/?node_id=645699
01:43 <****> hi
01:43 <****> $number = 20.53535; print % $number;
01:43 <****> is my goal but the syntax is wrong
01:44 <****> err, what do you mean ?
01:44 <****> and what's the goal?
01:44 <****> I just want the fractional portion of that but modulus needs to perform a division
01:45 <****> $number - int($number) ?
01:45 <****> eval: $_=20.53535; s/.+(?=\.)//; $_
01:45 <****> Zoffix: .53535
01:45 * Zoffix giggles and runs
01:45 <****> I think I like bpalmers idea the best
01:46 <****> zorton, mine wasn't really an idea ;)
01:47 <****> eval: $number = 20.234; $number - int($number)
01:47 <****> Zoffix: 0.234000000000002
01:47 <****> tsk
01:47 <****> hmmm
01:49 <****> re
01:49 <****> can you consider such a match operator legible:
01:49 <****>[ \t]*)([;\n])$/scg
01:49 <****> needs /x
01:49 <****> Christ!
01:49 * platypus wouldn't.
01:49 <****> Was about to say that.
01:49 * zorton would run and hide
01:49 <****> so this would be ok? http://paste.debian.net/40105
01:50 <****> falcon78, well.. what do you think?
01:50 <****> Yes it would be far better.
01:50 <****> needs a comment about what kind of strings it's intended to match, too
01:50 <****> with examples
01:52 <****> however, if you're trying to match double-quoted strings there is a simpler way
01:52 <****> Zoffix: i'm just a beginner, so of course i would prefer the /x version. but i thought that people used to perl maybe can read such stuff and are bored when seeing the /x version
01:53 <****> Somni: Text::CSV_XS ?
01:53 * platypus would also recomend that module.
01:55 <****> falcon78: what about it?
01:55 <****> xs clue? const-c.inc gets regenerated every time I do a perl Makefile.PL, and it's got a c syntax error in it
01:56 <****> gyre: are extern.pl and extern2.pl in your PATH and executable?
01:57 <****> Somni: i thought that might be the simpler way you startet talking about. if not, then i'm curious what that simpler way would be
01:59 <****> hellp ppl
01:59 <****> anyone have any clue on what i could do for this error .. urxvt: perl hook 0 evaluation error: Undefined subroutine &Scalar::Util::weaken called at /usr/lib/urxvt/urxvt.pm line 1181.
01:59 <****> i have reinstalled Scalar::Util
01:59 <****> wow
02:00 <****> richiefrich: do you have a compiler?
02:00 <****> but it doesnt seem like the weaken module is in there
02:00 <****> yeah
Total 39 pages. You are browsing page 3/39.
First :: Prev :: [1] [2] [3] [4] [5] [...] :: Next :: Last