Search Results

#!/usr/bin/perl -w
use strict;
use Time::Local;
use POSIX;

my @st_date = split/-/, $ARGV[0];
my @nd_date = split/-/, $ARGV[1];

my $st_dt = timelocal (0, 0, 0, $st_date[2], $st_date[1] -...

Hi try this:
awk '/AUTH/{A[$NF]++} /PRES/{P[$NF]++} /SETT/&& A[$NF] && P[$NF]{print $1}' infileor
awk '/AUTH/{A[$NF]++} /PRES/{P[$NF]++} /SETT/&& A[$NF] && P[$NF]{print $1; delete A[$NF]; delete...

Alternatively (assuming ID's are unique so accountnumbers are unique too):
awk '/AUTH/{A[$NF]=$0}/FINAL/&&A[$NF]{print $0 RS A[$NF]}' infileor more memory efficient:
awk...

nawk '{A[$1":"$NF]+=1;B[$0]=$1":"$NF}END{for(i in B) if (A[B[i]]>1) print i}' myfile

Are you sure you have expr on that machine ?

Can you try this inside loop to increment

A=$(( $A + 1 ))

Also, put #!/bin/ksh -x and observe the output when you run the script.

Regards...

What output do you want - exactly.

This "identifies" the scenario your defined

awk '{arr[$1 $2]++; next}
END{for (i in arr)
{
if(arr[i]>1)
{print i, "other...

SQL Loader has better performance for large loads, but you can also just use a quick awk script to process the CSV file, e.g...$ cat file1.csv
395 , LIES CANT BE FOUND IN TRUTH, 20110517 , PRD1
231...

That is a useless use of cat (http://partmaps.org/era/unix/award.html). Whenever you do cat foo | program you can also do program < foo to save your program a lot of wasted CPU time.

For programs...