Search Results

It is not a given that Perl will be any faster than Awk. In most cases it won't be.

Here is a code snippet that will get you started with multi-line records from a file:


#!/usr/bin/env perl
...

I guess that is why I am having a heck of a time creating it huh? :o

I am testing some file routines against potential "nasty name" Unix files, such as those with a CR, LF, in the middle or NULL terminated, utf multi-byte character. So, under Bash, I want some way of:...

With 50,000 files and a minimum of 66 fields, you might want to think about optimization. Perl running the same algorithm as awk will not be faster, and may be slower. However, with Perl, you would...

Here are some examples:


You keep data in files that are written each day and named that day. You want to access a file that is -1 day or some other number of days from today...
Your script is...

That works! :b:

One liner that does not change the input order

perl -nle 'if (/^\d+/) { push @nums, $_; } else { push @oth, $_; } END { for $i (0..($#nums<=$#oth ? $#nums : $#oth)) { print "$nums[$i].$oth[$i]";...

So why do all 19 files need to be open if you are processing 1 file at a time?

Do you have simple logic and maybe the Perl experts here can help? ie, present pseudo code of what you want to do,...

What is it you want to do with the 19 files?

Do all 19 need to be open simultaneously? Can you revisit your algorithm or what you are trying to do? Since ultimately the results of your 19 file handles are ending up in memory (with your...

Ahh solaris -- It is not your Bash at all; it is your version of awk.

On Sun, try `nawk` vs `awk`

So try:
eval $(nawk -F'[()]' '/Total:/{split($2,a,",| ");print a[2]"="a[1]";"a[5]"="a[4]}'...

Alister usually gets it right, and glad that works. :cool:

Curious why you get a Bash error tho for the other awk / eval solution -- what platform and Bash version?

This works beautifully... :)

Here is a test and example:

$ cat test_text.txt
Nr of active alarms are: 16...

Be aware that Comma Separated Value "CSV" is far more complex in practice than simple test cases often suggest. This applies to Perl, Awk, whatever regex or parsing tool you are using.

If you are...

The Perl operator split will split fields on whitespace or any other regular expression in one go.

Here (http://perldoc.perl.org/functions/split.html) is the documentation for that. (Or $ perldoc...

Alister you are the sh glob god. :)

Change the single quotes ' ' in option 2 to double quotes " "

In Perl, no variable interpolation takes place inside single quotes but does in double quotes. In single quotes, open is trying to...

First create the fixed header and tail files (text in my case, HTML in your case...)

$ echo "I am the header" > header.txt
$ echo "I am the tail" > tail.txt
$ cat header.txt
I am the header
$...

If I am understanding you correctly, you have:

1) A header file that contains HTML code that you wish to prepend to:

2) A series of 1,000 files that have text in them followed by:

...

:b:

I have to agree with you. The desktop wars are long over. News from the front: Windows won.

Unless there is a spectacular advantage, most users will not switch. The Gnome folks seem to be bent on...

Thanks. Not the answer I wanted, but at least I was not crazy for not finding that!

Note to Nautilus developers: that function is needed...

Perl will do that. There is a '06' vs '0' and '6' in your data. The code below sorts the '06' with the '0' and not the '6' but this is easily changed.

#!/usr/bin/perl

while(<DATA>) {
...

I am using Ubuntu 9.10 with Gnome 2.28.

I use the default Nautilus File Manager to view / manage files.

Is there a way to add icons or customize the icons that are above the location bar and...

Well kinda, but no, this is incorrect in some ways.

A struct adds labels to a group of related data in C. The group of data usually corresponds to a single record of structured data of some type,...