Help for this page

Select Code to Download

Select or download this

my $fruit = 'apple';
{
...
  print "$fruit\n";
}
print "$fruit\n";