بازدید: ١٨٠۵

نمایش فایلها(آموزش پرل)

 

   بازگشت به صفحه اصلی آموزش پرل(Perl)

 

1-      با استفاده از دستورات زیر اسکریپت جدیدی بسازید:

 

2-      فایل را تحت نام textviewer.pl و در پوشه PERLSCRIPTS ذخیره کنید سپس آن را به دایرکتوری perlscripts بر روی وب سرور خود آپلود کنید. مجوزهای آن را به گونه ای تغییر دهید تا تمامی کاربران بتوانند آن را اجرا کنند.

 

  open (THISFILE,"textthought.txt")

 فایل textthought.txt را باز می کند سپس متن درون آن را به متغیر فایلیTHISFILE تخصیص می دهد.

 

 foreach $line () {

 حلقه foreach تمامی خطوط موجود در متغیر THISFILE را می گردد. به عبارتی دیگر، تمامی خطوط textthought.txt را می گردد.

 حلقه فوق، در هر خط مقدار آن خط را به متغیر اسکالر $line تخصیص می دهد.

 

 print "$line
\n";

 همانطور که حلقه اسکریپت خط به خط پیش می رود، متن موجود در هر خط از فایل textthought.txt را نمایش می دهد.

 

 close (THISFILE);

 هنگامی که حلقه foreach تمام می شود، متغیر فایلی که به جای فایل textthought.txt می باشد، بسته می شود.

 

 3-      آدرس زیر را در مرورگر خود تایپ کنید:

 

 www.yourwebsite.com/cgi-bin/perlscripts/textviewer.pl

 

 خروجی باید شبیه به شکل زیر به نظر برسد:


files8g1

 

    بازگشت به صفحه اصلی آموزش پرل(Perl)

 

طراحی سایت و سئو توسط ضابط