怎么对数组赋值不行（大量）绝对送分！

unit cgihole;interface
uses winsock;
var
cgihole1:array [1..648] of string=['/.pl','/*.ida',
'/*.idc',
'/*.idq',
'/........../autoexec.bat',
'/....../',
'/....../all',
'/....../etc/hosts',
'/../../../../../../../boot.ini',
'/../../../../../winnt/repair/sam._',
'/../../../../config.sys',
'/../../../../etc/hosts',
'/.access',
'/.bash_history',
'/.htaccess',
'/.htpasswd',
'/.passwd',
'/?PageServices',
'/_AuthChangeUrl',
'/tree.dat',
'/user.dat',
'/user.log',
'/userreg.cgi?cmd=insert</=eng&tnum=3&fld1=test999%0acat</var/spool/mail/login>>/etc/passwd',
'/usr/local/apache/share/htdocs/.htaccess',
'/web_store.cgi',
'/WebShop/logs/cc.txt',
'/WebShop/logs/ck.log',
'/WebShop/templates/cc.txt',
'/WebSTAR',
'/whois_raw.cgi',
'/ws_ftp.ini',
'/wwwboard.pl',
'/wwwboard/passwd.txt',
'/.html/............*/config.sys',
'/.html/............./config.sys',
'/.html/............/autoexec.bat',
'/....../autoexec.bat',
'/....../config.sys',
'/cgi-bin/GW5',
'/cgi-bin/GW5/GWWEB.EXE',
'/cgi-bin/GWWEB.EXE',.......
];implementationend.