comment on

Why are you separating statements with commas instead of semi-colons?
Are you sure you want to remove 'id' and 'wa' once before the first print, and a second time for the second print?
Why are you pushing $, on the array?
Are you sure you want to print even numbers to '/var/adm/sa/cpu.out'?
What's with the local $,, and then putting it in a list you're printing to a file?
What's the purpose of @ar2?
What happened when you tried?
What does the manual page say about sort, and where the unsorted list is?
Do you know any other function where the argument is on the LHS of the assignment, and where the result is put into its last argument?
Why are you using bareword filehandles instead of lexical variables?

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Pathologically Eclectic Rubbish Lister
	PerlMonks