εκτέλεση shell commands μέσα σε perl script (SOLVED)

[Apollon Koutlidis]

Γιώργος Πάλλας wrote:
> Michael Iatrou wrote:
>   
>> When the date was Thursday 16 April 2009, Γιώργος Πάλλας wrote:
>>
>>   
>> ...
>>
>> @out = `top -bn1`;
>>     
>
> Κοίτα τι μάθαμε: το top βγάζει πέρα από το ορατό output και ένα κάρο
> control characters όταν ΔΕΝ τρέχει σε batch mode...
>   
FYI και για άλλες περιπτώσεις που δε σου δίνουν επιλογές σαν το -b της 
top, το ίδιο μπορείς να κάνεις και αλλάζοντας τον τύπο του τερματικού σε 
dumb - π.χ.: TERM=dumb top -m1

Εξ' άλλου και η επιλογή -b της top αυτό κάνει... και αν στο περιβάλλον 
δεν έχεις διαθέσιμο τον ορισμό του τύπου τερματικού dumb (όπως δυστυχώς 
συμβαίνει σε κάποια εμπεδομενοειδή σαν το SecurePlatform) η top -b θα 
εγκαταλείψει τον αγώνα αδόξως.

Α.