$VAR1 = bless( do{\(my $o = '&‼           ¼P&┘&☺$$Þ&☺$$Þ&☺    p&♣Æ|    m&♣Æ|Ì&┬&┐w  "
 Ò&┬&┐w0B" &╚#Ò&☺   &┤ØÓ&☺{        ²@&☺Gµ7 l¯&▄&☺        X&♠&┘&☺l¯&▄&☺¼*&▄&☺')}, 'XEvent' );