sub begin_work {
    use Data::Dumper;

    ... lotsa code

    no Data::Dumper;
    return;
}