Hi,

für das Lesen eines COBOL-Index-Datei muss ich konvertieren "MMTTJJ" Datum-Format "ccyyddd"-Format.
Ich habe die datecalc und andere Skripte couldnt aber ändern, um zu meinem müssen...

Die datecalc gibt einen Ausgang, den ich glaube, insgesamt ist die Tage bis zu diesem Datum, aber ich will, um ihn in ccyyddd Format

für Beispielprogramm: für den heutigen Tag: 092706 (MMTTJJ) Ich möchte, um ihn zu "2006270" (ccyyddd), und identisch wie sagen für jeden anderen Tag.

Vielen Dank im Voraus!

Grüße,
Bhups

Versuchen Sie diese

scp
mm=`expr substr "$1" 1 2`
dd=`expr substr "$1" 3 2`
yyyy="20""`expr substr "$1" 5 2`"

ddd=`cal_days $yyyy $mm $dd`

echo "$yyyy$ddd"

cal_days
#!/bin/perl
use Time::Local;
my $year=shift;
my $month=shift;
my $day=shift;
my $time = timelocal(0,0,23,$day,$month-1,$year-1900);
my $time1 = timelocal(0,0,0,1,0,$year-1900);
my $days = ( $time -$time1 ) / 86400;
printf("%.0f", $days);

$scp 092706
2006270

thanks a lot bro ... funktioniert