- or download this
# We put these next statements into a loop because we might encoun
+ter an error
# we can recover from. If so, the 'eval' will catch it and throw
+ it to 'if ($@)'
...
}
}
}
- or download this
my $Email3;
$Email3 = $mw->new_button(
...
);
$Email3->g_pack(-padx=>10, -pady=>10,);