Select Code to Download

package Eval;

...
    my ($self, $value) = @_;
    $value;
}

use Eval => ':';

$salary = 43_000;
print "After your raise, you will make $:{$salary*1.06}.\n";