#!/usr/bin/perl -w
$a = 'apples';
$b = 'bananas';
print "$a and $b \n";