version 1.25, 2008/08/21 12:08:32
|
version 1.28, 2008/12/10 23:28:04
|
Line 61 sub maximareply {
|
Line 61 sub maximareply {
|
sub blacklisted { |
sub blacklisted { |
my ($cmd)=@_; |
my ($cmd)=@_; |
foreach my $forbidden ( |
foreach my $forbidden ( |
'\? ','\?','%i','%o','batch','block' |
'\? ','\?','%i\d+','%o','batch','block' |
,'compil','concat','describe','display2d','file','inchar' |
,'compil','concat','describe','display2d','file','inchar' |
,'includ','lisp','load','outchar','plot','quit' |
,'includ','lisp','load','outchar','plot','quit' |
,'read','reset','save','stin','stout','stringout' |
,'read','reset','save','stin','stout','stringout' |