foreach my $emp ( @$emps ) {
      print "Employee: $emp->{ename}\n";
  }