Select Code to Download

push (@sort ,"@split[2]\t@split[1]\t@split[3]\t@split[0]\t@split[4]");

push (@sort ,"$split[2]\t$split[1]\t$split[3]\t$split[0]\t$split[4]");

push @sort, join "\t", @split[1, 2, 3, 4, 0];

use strict;
use warnings;
...

print join ("\t", @{$_}{qw(id kbid title endpoint date)}), "\n"
    for sort {$a->{id} cmp $b->{id} or $a->{kbid} <=> $b->{kbid}} valu
+es %entries;

    953432    Update for Microsoft Office Outlook 2003 (KB953432)    A
+BCDEF    2009-01-08
    956391    Cumulative Security Update for ActiveX Killbits for Wind
+ows 2000 (KB956391)    ABCDEF    2009-01-08
...
MS08-055        951944    Security Update for the 2007 Microsoft Offic
+e System (KB951944)    ABCDEF    2009-01-08
MS08-072        956828    Security Update for the 2007 Microsoft Offic
+e System (KB956828)    ABCDEF    2009-01-08
MS08-074        958439    Security Update for the 2007 Microsoft Offic
+e System (KB958439)    ABCDEF    2009-01-08