perl -MB::Deparse <perl program>