Помогите незнаю в чём дело, все сделал и загрузил на сервер а все символы выглядят так:
system.............................# # Author: Green Kakadu (WebScript.Ru Network) ......................# # Email:
gnezdo@webscript.ru .......................................# # WWW:
http://webscript.ru .........................................# # Copyright 2002 WebScript.Ru Network (
http://webscript.ru ).......# # All Rights Reserved. .............................................# #...................................................................# # Welcome to where time stands still # no one leaves and no one will # Moon is full, never seems to change # just labeled mentally deranged # Dream the same thing every night # I see our freedom in my sight # No locked doors, No windows barred # No things to make my brain seem scarred #................... Metallica, "Welcome Home (Sanitarium)" #...................................................................# # File name: admin.cgi ....................# #...................................................................# use strict; use CGI::Carp qw(fatalsToBrowser); use vars \'$time_view\',\'$script_admin\', \'$ext\', \'$img_url\', \'$tmpl_dir\', \'$data\', \'$public_dir\', \'$use_emoticons\', \'$public_url\', \'$use_flock\', \'$dir\', \'%msg\', \'%in\', \'$builder\', \'$index_url\', \'$index_page\', \'$entry_per_page\', \'$static_pages\', \'$view_cgi_url\', \'$site_title\', \'$how_news\', \'$use_search\', \'$not_found\', \'$foto_url\', \'$premoderate\', \'$send_new_comments\', \'$admin_mail\', \'$SEND_MAIL\', \'$comadmin_cgi_url\', \'$comment_url\', \'$mail_cgi_url\', \'$coms_per_page\', \'$foto_dir\', \'$img_dir\', \'$GMT\', \'$upload_url\', \'$autolink\', \'$qhtml\', \'$fozzy\', \'$txt_news\'; #....Load Libraries eval { require "cfg.cfg"; require "Sanitarium_WL.pm"; require "lang.pl"; }; #....If not Libraries if ($@){ print "Content-type: text/html\\n\\n"; print "ERROR including libraries: $@"; exit; } #flock() options: $Sanitarium_WL::USE_FLOCK=$use_flock; $Sanitarium_WL::USE_FLOCK||=0; #Own Error Logs. #$SIG{__DIE__}