Re: a perl question

2011-01-06 Thread Matthew Seaman
On 05/01/2011 22:15, RW wrote: Personally I find that using cat makes things simpler and less error prone when reusing pipelines in shell history. For example it's easier to edit cat file | foo into cat file | bar | foo or cat file? | foo than editing

Re: a perl question

2011-01-05 Thread Ian Smith
In freebsd-questions Digest, Vol 344, Issue 4, Message: 14 On Tue, 4 Jan 2011 23:24:01 -0700 Chad Perrin per...@apotheon.com wrote: On Tue, Jan 04, 2011 at 09:33:03AM -0800, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat

Re: a perl question

2011-01-05 Thread Chip Camden
Quoth Chad Perrin on Tuesday, 04 January 2011: On Tue, Jan 04, 2011 at 09:33:03AM -0800, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat asdf.txt | grep -v XYZ | grep -v bla And yet, you still have the Useless Use of Cat.

Re: a perl question

2011-01-05 Thread Chip Camden
Quoth Ian Smith on Thursday, 06 January 2011: In freebsd-questions Digest, Vol 344, Issue 4, Message: 14 On Tue, 4 Jan 2011 23:24:01 -0700 Chad Perrin per...@apotheon.com wrote: On Tue, Jan 04, 2011 at 09:33:03AM -0800, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou

Re: a perl question

2011-01-05 Thread Chad Perrin
On Thu, Jan 06, 2011 at 12:07:13AM +1100, Ian Smith wrote: Do you know of any 'less useless' or more economical way to do such as: % cat /boot/boot1 /boot/boot2 | diff - /boot/boot % Actually, that looks like a useful use of cat, whose original purpose it is to concatenate the contents

Re: a perl question

2011-01-05 Thread RW
On Wed, 5 Jan 2011 08:05:14 -0800 Chip Camden sterl...@camdensoftware.com wrote: Quoth Chad Perrin on Tuesday, 04 January 2011: The weirdest thing about most useless uses of cat is that not using cat would actually be a little clearer and involve fewer keystrokes -- as in this case.

Re: a perl question

2011-01-05 Thread Chad Perrin
On Wed, Jan 05, 2011 at 10:15:38PM +, RW wrote: For example it's easier to edit cat file | foo into cat file | bar | foo or cat file? | foo than editing foo file into bar file | foo or cat file? | foo In this case, example was:

Re: a perl question

2011-01-05 Thread RW
On Wed, 5 Jan 2011 15:13:02 -0700 Chad Perrin per...@apotheon.com wrote: In this case, example was: cat file | foo arg . . . where it could have been: foo arg file That's just kind of absurd. I mean, that sort of usage (foo arg file) is exactly the purpose for which grep

a perl question

2011-01-04 Thread S Mathias
cat asdf.txt bla-bla bla-bla bla[XYZ] importantthing another important thing [/XYZ] bla-bla bla-bla [XYZ] yet another thing hello! [/XYZ] bla-bla etc. $ SOMEPERLMAGIC asdf.txt output.txt $ cat output.txt importantthing another important thing yet another thing hello! how can i sovle this

Re: a perl question

2011-01-04 Thread Peter Vereshagin
You know St. Peter won't call my name, freebsd-questions! 2011/01/04 02:32:00 -0800 S Mathias smathias1...@yahoo.com = To freebsd-questions@freebsd.org : $ perl -Mstrict -nwe 'print unless m/bla|XYZ/;' asdf.txt 73! Peter pgp: A0E26627 (4A42 6841 2871 5EA7 52AB 12F8 0CE1 4AAC A0E2 6627) --

Re: a perl question

2011-01-04 Thread krad
On 4 January 2011 10:32, S Mathias smathias1...@yahoo.com wrote: cat asdf.txt bla-bla bla-bla bla[XYZ] importantthing another important thing [/XYZ] bla-bla bla-bla [XYZ] yet another thing hello! [/XYZ] bla-bla etc. $ SOMEPERLMAGIC asdf.txt output.txt $ cat output.txt

Re: a perl question

2011-01-04 Thread Jonathan McKeown
On Tuesday 04 January 2011 12:32:00 S Mathias wrote: cat asdf.txt bla-bla bla-bla bla[XYZ] importantthing another important thing [/XYZ] bla-bla bla-bla [XYZ] yet another thing hello! [/XYZ] bla-bla etc. $ SOMEPERLMAGIC asdf.txt output.txt $ cat output.txt importantthing

Re: a perl question

2011-01-04 Thread Patrick Bihan-Faou
Le 04/01/2011 14:06, krad a écrit : On 4 January 2011 10:32, S Mathiassmathias1...@yahoo.com wrote: cat asdf.txt bla-bla bla-bla bla[XYZ] importantthing another important thing [/XYZ] bla-bla bla-bla [XYZ] yet another thing hello! [/XYZ] bla-bla etc. $ SOMEPERLMAGIC asdf.txt output.txt $ cat

Re: a perl question

2011-01-04 Thread Randal L. Schwartz
Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat asdf.txt | grep -v XYZ | grep -v bla And yet, you still have the Useless Use of Cat. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 mer...@stonehenge.com

Re: a perl question

2011-01-04 Thread Devin Teske
On Jan 4, 2011, at 9:33 AM, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat asdf.txt | grep -v XYZ | grep -v bla And yet, you still have the Useless Use of Cat. I know I'm joining the party late, but... what about: grep -Ev

Re: a perl question

2011-01-04 Thread RW
On Tue, 4 Jan 2011 10:01:47 -0800 Devin Teske dte...@vicor.com wrote: On Jan 4, 2011, at 9:33 AM, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat asdf.txt | grep -v XYZ | grep -v bla And yet, you still have the Useless

Re: a perl question

2011-01-04 Thread Devin Teske
On Tue, 2011-01-04 at 22:12 +, RW wrote: On Tue, 4 Jan 2011 10:01:47 -0800 Devin Teske dte...@vicor.com wrote: On Jan 4, 2011, at 9:33 AM, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat asdf.txt | grep -v XYZ |

Re: a perl question

2011-01-04 Thread Randal L. Schwartz
RW == RW rwmailli...@googlemail.com writes: RW It's odd that people seem to be taking bla-bla so literally, when it's RW clearly a place holder for arbitary text. That's the problem when you provide an example instead of a rule. But oddly enough, once you figure out the actual rule,

Re: a perl question

2011-01-04 Thread Chad Perrin
On Tue, Jan 04, 2011 at 09:33:03AM -0800, Randal L. Schwartz wrote: Patrick == Patrick Bihan-Faou patrick.bihan-f...@teambox.fr writes: Patrick cat asdf.txt | grep -v XYZ | grep -v bla And yet, you still have the Useless Use of Cat. The weirdest thing about most useless uses of cat is

tricky perl question - ascending order

2010-05-23 Thread Jozsi Vadkan
or maybe in bash.. script/one liner e.g.: input: http://pastebin.com/raw.php?i=pMZPEsMZ i want to make this output from it: http://pastebin.com/raw.php?i=kH8VxT0A So from the input, i want to make an ascendant order, how many things are under a SOMETHING-XX Does anyone has any perl magic in

Re: tricky perl question - ascending order

2010-05-23 Thread Randal L. Schwartz
Jozsi == Jozsi Vadkan jozsi.avad...@gmail.com writes: Jozsi So from the input, i want to make an ascendant order, how many things Jozsi are under a SOMETHING-XX So you just want paragraphs ordered by line count? Something like this, untested: perl -00 'print map $_-[0], sort { $a-[1] = $b-[1]

Re: tricky perl question - ascending order

2010-05-23 Thread Jozsi Vadkan
The solution [i asked Randal L. Schwartz, because i didn't worked, and he said he just forgot the -e, now it works!!]: perl -00 -e 'print map $_-[0], sort { $a-[1] = $b-[1] } map [$_, tr/\n//], ' before.txt after.txt Thank you!! Jozsi == Jozsi Vadkan jozsi.avad...@gmail.com writes:

Perl question.

2006-08-17 Thread Greg Groth
I'm trying to install bandersnatch in conjunction with Jabber2 and running into some trouble. I'm following the how-to at: http://www.funkypenguin.co.za/bandersnatch_with_jabberd2 I've installed all of the listed sources from the ports, but when I run bandersnatch2.pl, I receive the following

Re: Perl question.

2006-08-17 Thread Dan Nelson
In the last episode (Aug 17), Greg Groth said: I'm trying to install bandersnatch in conjunction with Jabber2 and running into some trouble. I'm following the how-to at: http://www.funkypenguin.co.za/bandersnatch_with_jabberd2 I've installed all of the listed sources from the ports, but

Re: Perl question.

2006-08-17 Thread Greg Groth
Dan Nelson wrote: A quick web search shows that POE::Preprocessor was removed from POE in March. http://search.cpan.org/src/RCAPUTO/POE-0.3601/CHANGES : 2006-03-11 23:11:39 (r1887) by rcaputo poe/lib/POE/Preprocessor.pm D; poe/lib/POE/Macro D; poe/tests/10_units/01_preprocessor D;

Re: perl question

2004-08-14 Thread jason
Bart Silverstrim wrote: On Aug 13, 2004, at 1:10 AM, AlanSung wrote: IMHO, bsdpan-* means install via cpan directory (not via ports), p5-* means installed from ports.. Okay. Nuts. That's what I was afraid of. I guess I was a little thrown because the bsdpan modules are showing up with

Re: perl question

2004-08-13 Thread Bart Silverstrim
On Aug 13, 2004, at 1:10 AM, AlanSung wrote: IMHO, bsdpan-* means install via cpan directory (not via ports), p5-* means installed from ports.. Okay. Nuts. That's what I was afraid of. I guess I was a little thrown because the bsdpan modules are showing up with portversion and portupgrade,

perl question

2004-08-12 Thread Bart Silverstrim
What is the difference between bsdpan and the p5 modules in the ports collection? -Bart ___ [EMAIL PROTECTED] mailing list http://lists.freebsd.org/mailman/listinfo/freebsd-questions To unsubscribe, send any mail to [EMAIL PROTECTED]

Re: perl question

2004-08-12 Thread jason
Bart Silverstrim wrote: What is the difference between bsdpan and the p5 modules in the ports collection? -Bart ___ [EMAIL PROTECTED] mailing list http://lists.freebsd.org/mailman/listinfo/freebsd-questions To unsubscribe, send any mail to [EMAIL

Re: perl question

2004-08-12 Thread AlanSung
IMHO, bsdpan-* means install via cpan directory (not via ports), p5-* means installed from ports.. And yes, if you can find expected module in ports tree, it is better install from ports than install from cpan driectly.. Sometimes we need customized configuration args... On Thu, 12 Aug 2004

PERL question

2004-04-02 Thread Bart Silverstrim
Okay, this is probably off topic, and I'll gladly take it offlist if someone can contact me directly with an answer...I was hoping that with the BSD Unix gurus here, someone may have experience in the area of this question :-) I'm looking for a PERL script that can act kind of like a proxy

perl question

2004-01-28 Thread Roger Williams
I recently installed perl 5.8.3 (upgrade from 5.6.1) on my freebsd 4.9 box. And the following line in a script now gives errors: $realname =~ tr# a-zA-Z0-9\-,./'\200-377##dc; ERROR: Invalid range -3 in transliteration operator Thanks, Roger ___

perl question

2004-01-28 Thread Roger Williams
I recently installed perl 5.8.3 (upgrade from 5.6.1) on my freebsd 4.9 box. And the following line in a script now gives errors: $realname =~ tr# a-zA-Z0-9\-,./'\200-377##dc; ERROR: Invalid range -3 in transliteration operator Thanks, Roger ___

Re: perl question

2004-01-28 Thread Namik Dala
On Wed, Jan 28, 2004 at 08:55:48PM -0500, Roger Williams wrote: $realname =~ tr# a-zA-Z0-9\-,./'\200-377##dc; ^ There is a backslash missing. -Namik- ___ [EMAIL

OT: Another perl question

2004-01-18 Thread Gary Kline
Is there an easy way of determining file - determine file type in perl? at least as certain as magic(5) can ascertain? E.g: if (($ftype = file ($ARV[i])) eq script){ ## do abc; } else if ($ftype eq Mail){ ##

Re: OT: Another perl question

2004-01-18 Thread Chris Pressey
On Sun, 18 Jan 2004 15:55:42 -0800 Gary Kline [EMAIL PROTECTED] wrote: Is there an easy way of determining file - determine file type in perl? at least as certain as magic(5) can ascertain? E.g: if (($ftype = file ($ARV[i])) eq script){ ## do

OT - Perl Question

2003-11-11 Thread Darryl Hoar
I am trying to learn perl. I am going through a tutorial and have come across a syntax error I can't figure out. Here's the code: print Please tell me your name: ; chop ($name=STDIN); print Please tell me your nationality: ; chop ($nation=STDIN); if ( $nation eq British or $nation eq New

Re: OT - Perl Question

2003-11-11 Thread Fernando Gleiser
On Tue, 11 Nov 2003, Darryl Hoar wrote: if ( $nation eq British or $nation eq New Zealand ) { print Hallo $name, pleased to meet you!\n; } when I try to run it, it generates a compile errors on the if line. I know its the conditional test, but don't know how to fix it to be

Re: OT - Perl Question

2003-11-11 Thread Matthew Seaman
On Tue, Nov 11, 2003 at 02:57:04PM -0600, Darryl Hoar wrote: I am trying to learn perl. I am going through a tutorial and have come across a syntax error I can't figure out. Here's the code: print Please tell me your name: ; chop ($name=STDIN); print Please tell me your nationality: ;

perl question about @INC

2003-01-19 Thread David Banning
I got the error running a perl script; Can't locate Getopt/Simple.pm in @INC (@INC contains: /usr/local/lib/perl5/site_perl/5.005/i386-freebsd /usr/local/lib/perl5/site_perl/5.005 . /usr/libdata/perl/5.00503/mach /usr/libdata/perl/5.00503) at ./adddir.pl line 28. BEGIN failed--compilation

Re: perl question about @INC

2003-01-19 Thread Joe Marcus Clarke
On Sun, 2003-01-19 at 23:32, David Banning wrote: I got the error running a perl script; Can't locate Getopt/Simple.pm in @INC (@INC contains: /usr/local/lib/perl5/site_perl/5.005/i386-freebsd /usr/local/lib/perl5/site_perl/5.005 . /usr/libdata/perl/5.00503/mach /usr/libdata/perl/5.00503)

Perl question... calculating difference in time..

2002-12-05 Thread Eric Six
I know this isn't a perl list, but this is a perl on freebsd question! ;) I have a script that is sorting log files. I want to calculate the total time between log entrys. Here is the format of the log files: Dec 05 09:51:48.452 info info.info data ... Dec 05 09:53:49.543 info info.info data

RE: Perl question... calculating difference in time..

2002-12-05 Thread Jeff MacDonald
: Perl question... calculating difference in time.. I know this isn't a perl list, but this is a perl on freebsd question! ;) I have a script that is sorting log files. I want to calculate the total time between log entrys. Here is the format of the log files: Dec 05 09:51:48.452 info

Re: Perl question... calculating difference in time..

2002-12-05 Thread Matthew Seaman
On Thu, Dec 05, 2002 at 02:00:20PM -0500, Jeff MacDonald wrote: look into the perl module Date::Calc, it's has ALOT of features that are quite useful for date manipulation. The Time::ParseDate module by David Muir Sharnoff looks just the ticket.