use Win32::MMF::Shareable;
my $Var2;
tie $Var2, "Win32::MMF::Shareable", "Var2", { namespace => 'test' };
####
#!perl
use Win32::MMF::Shareable { namespace => 'test' };
my $Var2;
tie $Var2, "Win32::MMF::Shareable", "Var2";
$Var2 = "Kenneth, what's my namespace?";
print "Var2 is \"$Var2\"\n";
sleep 300;
####
#!perl
use Win32::MMF::Shareable;
my $Var2;
tie $Var2, "Win32::MMF::Shareable", "Var2", { namespace => 'test' };
$Var2 = "Kenneth, what's my namespace?";
print "Var2 is \"$Var2\"\n";
sleep 300;
####
#!perl
use Win32::MMF::Shareable {namespace => "test"};
my $Var2;
tie $Var2, "Win32::MMF::Shareable", "Var2";
print "Var2 is \"$Var2\"\n";
####
#!perl
use Win32::MMF::Shareable;
my $Var2;
tie $Var2, "Win32::MMF::Shareable", "Var2", {namespace => "test"};
print "Var2 is \"$Var2\"\n";
####
#!perl
use Win32::MMF::Shareable {namespace => "shareable"};
my $Var2;
tie $Var2, "Win32::MMF::Shareable", "Var2";
print "Var2 is \"$Var2\"\n";