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

[Giorgos Keramidas]

On Fri, 17 Apr 2009 14:32:39 +0100, Apollon Koutlidis <apollon at planewalk.net> wrote:
> Γιώργος Πάλλας 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

... ή να φιλτράρεις το output μέσα από το col(1) utility:

    % top | col -b | mystuff