perl -MData::Dumper -e 'print Dumper bless \((49)[0]), "Rat::Notification";'
$VAR1 = bless( do{\(my $o = 49)}, 'Rat::Notification' );