Select Code to Download

{
    local $, = ' ';
    print @{$_}[0..4], "\n" for @Data;

}

{
    local $, = ' ';
    print @$_[0..3], $$_[4] ."\n" for @Data;

}