Mega Code Archive

 

Categories / Perl / Statement

 

Going onto the Next

#!/usr/bin/perl use strict; use warnings; my @array = (8, 3, 0, 2, 2, 0); for (@array) {     if ($_ == 0) {         print "Skipping zero element.\n";         next;     }     print "48 over $_ is ", 48/$_, "\n"; }