use strict; use warnings; use CGI::Carp qw(fatalsToBrowser warningsToBrowser); use IPC::System::Simple qw(capture system $EXITVAL); print "Content-Type: text/html\n\n"; my $results = `svn info --non-interactive --trust-server-cert --username --password --config-dir `; print "
$results
";