version 1.25, 2008/08/21 12:08:32
|
version 1.26, 2008/09/24 18:01:07
|
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' |
'\? ','\?','%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' |