use strict; use warnings; use 5.006_001;

    my %h = (t => 1, u => 1, v => 1, t1 => 1, u1 => 1, v1 => 1);
    print foreach (sort keys %h);