if ($hour < 2) {
my $newday;
$newday = 2 - $hour;
# ...
}
elsif ($hour >= 2) {
my $newday;
$newday = 24 - $hour;
# ...
}