#!/usr/bin/perl -P #define MYPATH "/WEBDEVELOPMENT/cgi-bin/postcode.txt" read_in_file(); sub read_in_file { open(INPUTFILE, "<".MYPATH."postcode.txt"); }