Select Code to Download

use strict;
use warnings;
...
local $" = "\t";
print "@hdr\n";
print "@$_\n" for sort { $a->[1] <=> $b->[1] } @arr;

names   age
Vikram  16
...
Manu    36
Vijay   41
Hetal   54