view release on metacpan or  search on metacpan

infra/h2ph  view on Meta::CPAN

    }
    print OUT "1;\n";

    $Is_converted{$file} = 1;
    queue_includes_from($file) if ($opt_a);
}

exit $Exit;


sub reindent($) {
    my($text) = shift;
    $text =~ s/\n/\n    /g;
    $text =~ s/        /\t/g;
    $text;
}


sub expr {
    my $joined_args;
    if(keys(%curargs)) {