Re^5: How to add columns with new row name using perl from mysql query?

in reply to Re^4: How to add columns with new row name using perl from mysql query?
in thread How to add columns with new row name using perl from mysql query?

Tested on MySQL

SELECT
   CASE WHEN num <= @row_limit THEN queue_name ELSE 'others' END
   queue_name,
   sum(jobs_pend) jobs_pend,
   sum(jobs_run)  jobs_run
   FROM
    (
     SELECT
        @row_num := @row_num+1 as num,
        queue_name,
        jobs_pend,
        jobs_run
     FROM
        queues,
        (SELECT @row_num := 0,  @row_limit := 5) r
     ORDER BY
        queue_name
    ) q
    GROUP BY 1
[download]

poj

In Section Seekers of Perl Wisdom