Posted By

Mazzaroth on 02/19/11


Tagged


Versions (?)

Who likes this?

1 person have marked this snippet as a favorite

wheffner


pretty-print array


 / Published in: Perl
 

  1. sub pretty_print_array {
  2. my ( $title, @array) = @_;
  3. my $numb = $#array +1;
  4.  
  5. print "Array : $title ($numb entries)\n";
  6. for $line (@array)
  7. {
  8. print "\t'$line'\n";
  9. }
  10. print "=========================\n\n";
  11. }
  12.  

Report this snippet  

You need to login to post a comment.