#!c:/perl/bin/perl.exe -w
use strict;
use CGI;

my $q = new CGI;
print $q->header( "text/plain" );
system "cmd.exe /c show.exe";