Select Code to Download

perl -Minteger -e 'print 15/2 + 1'

use strict;
use warnings;
my $eight = int (15 / 2 ) +1;
print $eight;