Hi perl lovers

how to simplify the following code

                                                                      
+                                                       
%hash = ( 1 => 'one' , 2 => 'two' , 3 => 'three' );
                                                                      
+                                                       
                                                                      
+                                                       
foreach ( keys %hash ) {
        push @one , $hash{$_};
        push @two, $_;
}
[download]

I want the above for to be in single line and consider the performance also.