#!/usr/bin/perl our $apple = "pie"; 1;