![]() |
|
|
google unix.com
|
|||||||
| Forums | S'inscrire | Forum Rules | Liens | Albums | FAQ | Liste des membres | Calendrier | Recherche | Aujourd'hui, les postes | Marquer les forums comme lus |
| De programmation et de script Shell Posez vos questions à propos de KSH, CSH, SH, BASH, PERL, PHP, SED, awk et d'autres scripts shell et les langages de script shell ici. |
Plus d'UNIX et Linux Forum Sujets Vous trouverez peut-être utile
|
||||
| Fil | Thread Starter | Forum | Réponses | Last Post |
| Comment calculer la valeur maximale et la valeur min | gobinath | De programmation et de script Shell | 1 | 05-29-2008 01:01 AM |
| Pour trouver le mot qui se produit nombre maximum de fois | aajan | De programmation et de script Shell | 5 | 01-11-2008 04:11 AM |
| Pour en savoir de plus en plus le maximum de fichiers dans un support | raman1605 | UNIX pour les nuls Questions et réponses | 3 | 10-01-2007 09:25 PM |
| Comment trouver le maximum de DIP # | stevefox | UNIX pour les nuls Questions et réponses | 8 | 08-04-2006 05:22 AM |
| Variable d'environnement la valeur maximale | tonyv | De programmation et de script Shell | 2 | 03-15-2005 05:25 AM |
![]() |
|
|
LinkBack | Thread Tools | Recherche sur ce Thread | Rate Thread | Modes d'affichage |
|
|
|
||||
|
Besoin de trouver le minimum et maximum
Salut,
J'ai un fichier avec une liste de valeurs. J'ai besoin de trouver le nombre minimum et maximum d'une colonne dans ce fichier. Par exemple, le fichier peut ressembler à ceci: 1 2 3 45 32 2 3 5 36 87 5 8 3 96 23 8 9 6 24 56 Ainsi, dans la liste ci-dessus, j'ai besoin de trouver le minimum et le maximum de chiffres dans la 4ème et 5ème colonne Colonne. Note: Le fichier d'origine contient plus de 1000 lignes. Observe Ashok Y |
|
||||
|
Salut, vous utilisez mai perl, Attachez votre fichier pour le module ci-dessous, vous pouvez traiter votre dossier comme un tableau à deux dimension de la colonne. Code:
package FileArray;
sub _makeArr{
$file=shift;
open FH,"<$file";
while(<FH>){
my @tmp=split(" ",$_);
for($i=0;$i<=$#tmp;$i++){
$arr[$i][$.-1]=$tmp[$i];
}
}
close FH;
}
sub TIEARRAY{
my($self,$file)=(@_);
_makeArr($file);
return bless \@arr,$self;
}
sub FETCH{
my($self,$ind)=(@_);
return $arr[$ind];
}
sub STORE{
my($self,$ind)=(@_);
return $arr[$ind];
}
1
Ensuite, utilisez les scripts apparaît ci-dessous peuvent vous aider un peu. Code:
use FileArray;
tie @arr,"FileArray","a.txt";
@brr=sort @{$arr[4]};
print "Min: $brr[0] -- Max: $brr[$#brr]\n";
|
![]() |
| Bookmarks |
| Tags |
| perl, perl changement, déplacement, changement perl |
| Thread Tools | Recherche sur ce Thread |
| Modes d'affichage | Rate this thread |
|
|