#!/usr/bin/perl $FILE = "this is my file, i'm going to want this value later\n"; print $FILE; require('./varstruct.pl'); print $FILE; &VARSTRUCTOR('show', 'E: subs(VARSTRUCTOR)', './varstruct.pl'); # Test print $FILE;