![]() |
Hei og Velkommen fra USA til UNIX og Linux Forums! Takk for besøket og Delta i vårt globale samfunn.
|
|
google unix.com
|
|||||||
| Forums | Registrer | Forum Rules | Lenker | Album | FAQ | Medlemsliste | Kalender | Søke | Dagens innlegg | Marker forumene som lest |
| Shell programmering og Skripting Post spørsmål om ksh, csh, SH, Bash, Perl, PHP, SED, awk og ANDRE shell scripts og Shell skriptespråk her. |
Mer UNIX og Linux Forum Emner Du kan finne nyttig
|
||||
| Tråd | Tråd startet | Forum | Svar | Siste innlegg |
| Hvordan beregne maksimumsverdien & min verdi | gobinath | Shell programmering og Skripting | 1 | 05-29-2008 01:01 |
| Å finne ord som forekommer maksimalt antall ganger | aajan | Shell programmering og Skripting | 5 | 01-11-2008 04:11 |
| Finn ut maksimalt voksende fil i en monter | raman1605 | UNIX for Dummies Spørsmål og svar | 3 | 10-01-2007 09:25 |
| Hvordan finne den maksimale antall PIDs | stevefox | UNIX for Dummies Spørsmål og svar | 8 | 08-04-2006 05:22 |
| Miljøvariabel Maksimumsverdien | tonyv | Shell programmering og Skripting | 2 | 03-15-2005 05:25 |
![]() |
|
|
LinkBack | Thread Tools | Søk i denne tråden | Rate Thread | Visningsmoduser |
|
|
|
||||
|
Trenger du å finne mimimum og maksimal
Hei,
Jeg har en fil med en liste over verdier. Jeg trenger å finne minimum og maksimum antall en bestemt kolonne i denne filen. For eksempel kan filen ser ut, 1 2 3 45 32 2 3 5 36 87 5 8 3 96 23 8 9 6 24 56 Så, i listen ovenfor, må jeg finne ut minimum og maksimum fra tallene i 4. kolonne og 5. Kolonne. Merk: Den opprinnelige filen inneholder mer enn 1000 linjer. Hilsen Ashok Y |
|
||||
|
Hei, kan du bruke perl, Tie filen til under modul, så kan du behandle filen som en to-dimensjonal array av kolonnen.
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
Code:
use FileArray;
tie @arr,"FileArray","a.txt";
@brr=sort @{$arr[4]};
print "Min: $brr[0] -- Max: $brr[$#brr]\n";
|
![]() |
| Hugseliste |
| Tags |
| perl, perl skiftarbeid, skifte, shift perl |
| Thread Tools | Søk i denne tråden |
| Visningsmoduser | Ranger denne tråden |
|
|