Advertisement
Guest User

Untitled

a guest
Jul 20th, 2017
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.19 KB | None | 0 0
  1.  
  2. foreach my $k ( keys %courses){
  3. #   my $values = $courses{$k};
  4.     my %values = %{$courses{$k}};
  5. #   print $values->{'title'};
  6.     print "<course>\n";
  7.     print $values{'title'};
  8.     print "</course>\n";
  9. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement