my modname='Win32';
require $mymodname;
import $mymodname qw(GetOSName);
$my osname = GetOSName();