eval source.perl Try/Except