$my osname = Win32::GetOSName();

##</code><code>##

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