[Pascal] Traduction en pascal d'un script en shell

SVP pouvez vous m'aider?

3 mars 2006 à 19:25:28

Bonjour

Voila je suis très embetté.
Donc j'ai fait n script en shell mais on me demande de le traduire en pascal mais je connais pas trop de connaissance dans ce langage.

Pouvez vous m'aider ou du moins m'apporter des conseils.

J'aurais besoin de vos lumières surtout pour ouvir un fichier, lire les lignes de ce fichier et intérpréter les fonction shell comme rm ou cat ou mkdir etc..

#On extrait de la date le mois et le jour
mmjj=`date +%m%d`
#Création d'un répertoire temporaire
mkdir temp
#Parcours le fichier
cat svRJ |
while read ligne
do
set `echo $ligne`
numgref=$1
lignegref=`grep $(($numgref)) gref.inpi`
set `echo $lignegref`
nomgref=$2
nomfichier=jaf.$nomgref$mmjj
if test ! -e save/$nomfichier
then
if test ! -e greffes/$nomfichier
then
echo $ligne >> temp/$nomfichier
fi
fi
done
#on stocke la liste des fichiers créés dans un fichier "liste"
cd temp/
find *$mmjj > liste
cd ..
if [ -e temp/liste ]
then

cat temp/liste |
while read fichier
do
# On déplace le fichier du répertoire "temp" s'il n'est pas présent dans save et dans greffe
if test ! -e greffes/$fichier
then
`mv temp/$fichier greffes/`
fi
done
fi
#suppresion des fichiers créés
rm temp/liste

S'il vous plait, c'est très important.

Merci d'avance

Pour finir je travaille sous mandrake

Anonyme

3 mars 2006 à 21:21:29

deja j'espere que tu lis l'anglais

une bonne doc pour pascal dispo ici ok c'est vieux mais qui a dit que pascal etait nouveau ?:p

je sais plus ou c'est mais c'est sur que y'a ce que tu veut sur les fichiers ... (souvenirs)

apres moi le shell je connais pas , et pascal j'ai commencer y'a a peine 6 mois ...
mais bon au cas ou

( edit )
lesson 1 chapitre 13 tu trouve ton bonheur sur les fichiers

llaurentt

6 mars 2006 à 12:05:43

Je vais regarder ca merci beaucoup