Just a quick question as to why this is not working, In the sample.pl of PerlTray, there is a balloon notification, and when i run the executable and select "balloon" or "timer" in effects, it doesnt do anything. Everything else works great.

Here is the sample.pl in PerlTray:

use PerlTray;

our @anim = qw(icon1 icon2 icon3 icon4);

sub show_balloon {
    Balloon("This is the message", "Balloon Title", "Error", 15);
}

sub PopupMenu {
    return [["*ActiveState", "Execute 'http://www.ActiveState.com'"],
        ["MessageBox", sub { MessageBox("This is a $_!") }],
        ["Effects", [["Animate", 'SetAnimation("0:20", $freq, @anim)']
+,
             ["*Ballon", \&show_balloon],
             ["Timer",   'SetTimer(":2.500")'],
             ["Icon1",   sub {SetIcon($_)}],
             ["Icon2"],
            ]],
        ["--------"],

         ["o Fast   :50",  \$freq],
         ["x Medium :100"],
         ["o Slow   :200"],

#         ["o Fast",   '$freq =  50', $freq==50],
#         ["o Medium", '$freq = 100', $freq==100],
#         ["o Slow",   '$freq = 200', $freq==200],

        ["--------"],
        ["_ Unchecked", ""],
        ["v Checked", undef, 1],
        ["v Checked", \$check],
        ["--------"],
        ["  E&xit", "exit"],
       ];
}

sub ToolTip { localtime }

sub Timer {
    SetTimer(0);
    Balloon("Timer triggered Message", "The Balloon", "Info", 5);
}

sub TimeChange {
    Balloon(scalar localtime, "System Time Changed", "Info", 5);
}
[download]

EDIT: I have tried posting in the active state community but when I try to post it does not save for some reason.
UPDATE: I have also went through gpedit.msc and made sure all the policies were set to allow the balloon popups. The only other thing i could think is maybe windows 10 handles it a little different, or they are not fully supported yet. Anyways, thanks for reading.