Help for this page

Select Code to Download

Select or download this

while (<DATA>) {
    eval $_;
}
...
$apple = 'green';
$pear = 'sweet';
$orange = 'healthy';