print $out map { s/^    //; $_ } split /\n/, "    package Date::Manip::TZ::$module;
    # Copyright (c) 2008-$curr_year Sullivan Beck.  All rights reserved.
    ...
"