##
#!/usr/bin/perl -w
use strict;
my $foo;
$foo = 7;
if ($foo == 7)
{
$foo++;
}
print($foo);
##
##
#!/usr/bin/perl -w
use strict;
my $foo;
$foo = 6;
if ($foo == 7)
{
$foo++;
}
print($foo);
##
##
if ($foo == 7)
{
$foo++;
}