محاضرات مفتوحة في عام 2020
counter.cgiلحساب عدد مرات ظهور صفحة ويب ، تحتاج إلى ملف لتخزين بيانات العد. فيما يلي برنامج Perl CGI أساسي. يقرأ البرنامج الملف المضاد ، ويزيد من العدد ، ويكتب العد المحدث مرة أخرى إلى الملف وصفحة الويب.
src/counter.cgi # !/usr/bin/perl
use strict;
use warnings;
use CGI qw( :standard ) ;
# カウンタファイルのパスを指定
my $counter_file = ' counter.txt ' ;
# カウントを取得および更新
open my $fh , ' +< ' , $counter_file or die " Can't open $counter_file : $! " ;
my $count = < $fh >;
$count = 0 unless defined $count ;
$count ++;
seek $fh , 0, 0;
print $fh $count ;
close $fh ;
# HTMLページを出力
print header;
print start_html( ' Counter Page ' );
print " This page has been viewed $count times. " ;
print end_html;لتشغيل برنامج CGI ، اتبع هذه الخطوات:
حفظ البرنامج :
counter.cgi .تحديد أذونات التنفيذ :
chmod +x src/counter.cgiتكوين XAMPP :
تكوين دليل CGI :
/Applications/XAMPP/etc/httpd.conf ) في المحرر وقم بتعيين دليل CGI على النحو التالي: <Directory "/Applications/XAMPP/cgi-bin">
AllowOverride None
Options ExecCGI
Order allow,deny
Allow from all
</Directory>
وضع البرنامج :
ファイルをcounter.cgi إلى دليل/applications/xampp/cgi-bin`.counter.cgi في دليل /Applications/XAMPP/cgi-bin ، يمكن لخوادم xampp apache التعرف عليها وتشغيلها بشكل صحيح ، حتى لو كان ملف counter.cgi الفعلي في مكان آخر. لإنشاء رابط رمزي ، افتح محطة وقم بتشغيل الأمر التالي (استبدل مسار ملف counter.cgi الفعلي ووجهة الرابط بشكل مناسب): $ ln -s src/counter.cgi /Applications/XAMPP/cgi-bin/counter.cgi ينشئ هذا الأمر رابطًا رمزيًا يسمى counter.cgi في دليل /Applications/XAMPP/cgi-bin ، والذي يشير إلى ملف counter.cgi الفعلي. يمكنك بعد ذلك تشغيل برنامج CGI من خلال زيارة http://localhost/cgi-bin/counter.cgi باستخدام متصفح الويب.
http://localhost/cgi-bin/counter.cgi . هذه هي الطريقة التي يجب أن يعمل بها البرنامج المضاد ويجب أن يزداد العد في كل مرة تصل فيها إلى صفحة الويب. يتم حفظ قيمة العداد أيضًا في ملف counter.txt ، ويقرأ البرنامج قيمة العدد من هذا الملف.