require Exporter;

@EXPORT=qw(@chassistypes $commstring $sysname $syscontact $syslocation $ipadentaddr
        $cdpdevicecacheport $ipadentnetmask $cdpcacheplatform $cdpcachedeviceport
        $chassisid $chassistype $sysdesc $romid);
........

$commstring=`/usr/bin/cat /var/scripts/.data/commstring`;
chomp $commstring;

........

1;