Search Results

That quite likely is the case. Chances are that the TERM variable should be set to one of {XTERM,VT100,VT200}, depending on the type of keyboard, but if it is something entirely different, then that...

Have any of you ever tried to use Vile? It is an editor that tries to have the finger feel of a Vi based editor, yet beneath the covers there is actually an engine that traces its roots back to...

While I do not always use straight Debian, I am a HUGE fan of Debian based systems, and I periodically like to try out the Debian netinst. You are right. I would nominate Debian as the MOST...

Is that the Sam editor from the Plan9 OS? Do you also use Plan9 by any chance? If so, I would be interested in a conversation about that - which we can open elsewhere.

Over at DistroWatch, Ubuntu and PCLinuxOS have dominated polls over the past few years. In business, Red Hat has dominated, and the Red Hat company has done well for several years. Debian is not...

Great choice! I would have to agree with you that among binary distributions, Arch has to be the fastest one out there because you configure exactly what you want. Based originally on Slackware and...

Here is the final version (edited) of what I came up with:

#!/usr/bin/perl

# File: MatchID.pl
# Author: Brian Masinick
# Initial Creation Date: August 1, 2008


# Inputs:
# M input feed...

So your code would compare the second field in the first file with the fourth field in the second file, and if they match, print out the full record from the second file?

I don't understand the...

How about this then?

while (<MOUTPUT>) { @fields1 = split "[|]"; $moutput{@fields1[1]}=$_; };and then

while (<SINPUT>) { @fields2=split "[|]"; if ($moutput{$fields1[1] eq $moutput{$fields2[3])...

OK, good. Zero offset arrays. I can deal with that.

Would the comparisons then be something like this?

Assuming that I do:

@fields1=split "[|]";
@fields2=split "[|]";

if (@fields1[1]...

The line my $line = <SINPUT>; is not needed. Was originally going to include that to work on the second file.

I still need to work on that part.

I am thinking of using split to pick off the...

I got the first part of my question answered. Here is a code snip for that part:


while (<MINPUT>) {
if ( /\|Y\|/ ) {
print MOUTPUT;
my $line = <SINPUT>;
}
}On the...

# delete leading whitespace (spaces, tabs) from front of each line
# aligns all text flush left
sed 's/^[ \t]*//' # see note on '\t' at end of file

# delete trailing...

# trim trailing spaces, note the s// matches what matched.
/ $/s///

# delete empty lines
/^$/d

I am aware that Perl has a lot of features that originally came from sed and awk. I have a pattern that I am using like this:

sed -n '/|Y|/p'

I want to do the same thing in Perl and be able to...

Removed my comments.

cleaned out comment.

removed comment

Vi is extremely powerful, no doubt about it. To me, editor surveys boil down to finger speed, and Vi wins those touch typing contests every time, or feature sets, and Emacs can do it all - including...

Funny you say that. In 1982, I got my first exposure to Emacs on a MULTICS system but never really learned or mastered it. In 1985 I got another chance with Emacs. On one platform, it was too big...

removed comment