use strict;

use vars qw($filevar1 $filevar2 $filevar3);

my($scriptvar1,$scriptvar2,$scriptvar3,$required) = 0;

my$file = 'somefile';

if(-e $file){
     if(eval "require '$file'"){
          $scriptvar1 = $filevar1; 
          $scriptvar2 = $filevar2; 
          $scriptvar3 = $filevar3;
          $required = 1;
          }
     }