foreach my $hour (map { sprintf "%02d", $_ } 0 .. 23) {
   # Do Stuff Here
}

##</code><code>##

foreach my $hour ( '00' .. '23' ) {
   # Do Stuff Here
}