Here's the obvious way:

foreach my $key ( sort keys %data ) {
    print $data{$key};
}
[download]

Here it is, using a map within a single print call:

print map { $data{$_} } sort keys %data;
[download]

Here's a way using a hash slice:

foreach my $val ( @data{ sort keys %data } ) {
    print $val;
}
[download]

Even the slice can be printed in a single print call:

print @data{ sort keys %data };
[download]

Of course, you'll want to set up the variables $, and $\ appropriately...