Search Results

Hi,
Can you try job_depends command of autosys ?
Thanks
Pravin

Delphys,
Perl one liner works at my end. It would be helpful if you could attached part of your i/p file.
~Pravin~

Delphys,

What's the issue with perl code in post #6 ? Could you please post some more information (like error , o/p ) ?

~ Pravin ~

Using Perl
#!/usr/bin/perl
open (FH,"/path/to/file.txt") or die "cannot open file \n";
my $pos=0;
while (1) {
seek(FH,$pos,0);
while (<FH>) {
print $_;
}
$pos=tell(FH);
}

echo ",750,0000000000000000GCJR, ,06/22/2016 11:48:44" | awk -F"," '{
hr=substr($NF,12,2);
if (hr > 11) { b="PM"
hr-12 == 0 ? nhr=hr : nhr=hr-12
} else { b="AM";nhr=hr}
printf "%s%02d%s...

date -d "06/22/2016 14:48:44" '+%m/%d/%Y %r'

Prohank,

Suppose file contains 5 columns, key fields are 1, 2 and agg field is 5.
What about field no 3 and 4. Do we suppose to agg or ignore ?

Thanks
Pravin

Using Perl

use Net::FTP
my $flagFile="flag.file";
my $ftp = Net::FTP->new("host") or die "cannot connect \n";
$ftp->login("user","passwd") or die "cannot login \n";
my...

try below code
rsync -rv --dry-run --include='*/*/Subsub1/*' --exclude='*/*/Subsub2/*' ./RootFolderI/ ./RootFolderII/
Remove --dry-run option if you are good with o/p

Hi ,
Try new code from post #6.

Thanks
Pravin

yes, You can modify code as below.
awk 'NR==1{first=$0;prev=$0;next }
$0 - prev == 1 { prev=$0; next } { if (first != prev) { print first,prev;} else { print prev} prev=$0;first=$0 } END { print ...

export Numbr_Parms=$#
export a=1
while [ $a -le $Numbr_Parms ]
do
eval export DBName_$a=\$$a
echo DBName_$a
eval echo \$$DBName_$a
a=`expr $a + 1`
done

RavinderSingh13,
One doubt here , why 179 183 is in your o/p
o/p in the post of before4 does not include it.
Little modification if you want to exclude 179 183
awk 'NR==1{first=$0;prev=$0;next }...

1) Please use code tag
2) What have you tried so far ?

try below
awk '{if (a[$1FS$2FS]) {a[$1FS$2FS] =a[$1FS$2FS]","$3} else {a[$1FS$2FS]=$3}} END {for (key in a) { print key a[key]}}' testfile

try this
find . -type f \( -name '*SQLite*' -o -name '*XML*' \) -exec ls -ltr {} + | awk '{filename=$NF;$NF="";printf $0" ";system ("/usr/bin/file "filename); }'

Could you please provide some more information ? What is desired o/p ?

Hi RudiC,
I think solution need 6 character to extract instead 7 substr($1, 5, 7)

Thanks
Pravin

using perl
my $sourceFile="/v/global/user/b/bh/bharade/Programs/Forum_Scripts/Layout.txt";
my $targetFile="/v/global/user/b/bh/bharade/Programs/Forum_Scripts/abc.txt";

open(FH1,"$sourceFile") or...

what about field(s) from position 4 to 9 . Could you please provide your input file

I am assuming layout.txt will have all the fields in ascending order with no. of characters seperated by...

You can use getline in awk to get the desire output. i have modified your code as below.
nawk '{print " " $NF}' line2 > nawk6
nawk '
{CNF = (length()-10)/7
...

remove line last LINE; and try .

You need convert it to seconds so you can use comparison operator in condition. Date format (2016-02-28) is not an integer , that's why script was throwing an error.

You can modify your for loop as below.
for (i=2; i<=CNF+2; i++) {printf "%7s", T[i]; if ( i == 19) {printf "%7s", "2.979"}}

Convert your date to seconds and then compare.
dProcDate="2016-02-29"
dCurrent="2016-05-31"

dProcDate_sec=$(date -d"$dProcDate" '+%s')
dCurrent_sec=$(date -d"$dCurrent" '+%s')

if [...