پرل میں فائل ہینڈل ماڈیول

Prl My Fayl Yn L Ma Ywl



فائلوں کو بنانے اور ان تک رسائی کے لیے پرل میں متعدد طریقے موجود ہیں۔ فائل ہینڈلر کا استعمال کرتے ہوئے پرل میں پڑھنے، لکھنے یا اپ ڈیٹ کرنے کے لیے فائل کھولی جا سکتی ہے۔ فائل ہینڈلر کو اوپن() طریقہ کار میں سٹرکچرڈ پروگرامنگ فارمیٹ یا آبجیکٹ اورینٹڈ پروگرامنگ فارمیٹ میں استعمال کیا جا سکتا ہے۔ فائل ہینڈل ماڈیول کو پرل میں فائل ہینڈل کو بطور آبجیکٹ قرار دینے کے لیے استعمال کیا جا سکتا ہے اور اس آبجیکٹ کو 'فائل ہینڈل' کلاس کی مختلف خصوصیات اور طریقوں کا استعمال کرتے ہوئے فائل بنانے یا اس تک رسائی کے لیے کھولنے کے لیے استعمال کیا جا سکتا ہے۔ فائل ہینڈل ماڈیول کے کچھ عام طریقوں کے استعمال اور پرل میں فائل کے ساتھ کام کرنے کے لیے فائل ہینڈل ماڈیول کے استعمال کے طریقے اس ٹیوٹوریل میں دکھائے گئے ہیں۔

فائل ہینڈل کے کچھ مفید طریقے

فائل ہینڈل ماڈیول کے کچھ عام استعمال شدہ طریقے درج ذیل ہیں:

طریقہ مقصد
بتانا یہ فائل کے سائز کو بائٹس میں شمار کرنے کے لیے استعمال ہوتا ہے۔
getc یہ فائل کے مواد کے ہر کردار کو پڑھنے کے لیے استعمال ہوتا ہے۔
تلاش کریں یہ فائل پوائنٹر کو کسی خاص پوزیشن پر منتقل کرنے کے لیے استعمال ہوتا ہے۔
eof یہ فائل کے اختتام کی طرف اشارہ کرتا ہے۔
بند کریں اس کا استعمال پہلے سے طے شدہ فائل ہینڈلر کو بند کرنے کے لیے کیا جاتا ہے۔

پرل فائل ہینڈل کی مثالیں۔

فائل ہینڈل ماڈیول کے مختلف استعمال ٹیوٹوریل کے اس حصے میں متعدد مثالوں کا استعمال کرتے ہوئے دکھائے گئے ہیں۔







مثال 1: ایک نئی فائل بنائیں

درج ذیل اسکرپٹ کے ساتھ ایک پرل فائل بنائیں جو FileHandle ماڈیول کا استعمال کرتے ہوئے ایک نئی فائل بناتی ہے۔ ایک فائل کا نام صارف سے لیا جاتا ہے اور چیک کیا جاتا ہے کہ آیا یہ موجود ہے یا نہیں۔ اگر فائل موجود نہیں ہے تو، 1 سیکنڈ انتظار کرنے کے بعد فائل کو 'فائل ہینڈل' کلاس کا ایک آبجیکٹ بنا کر لکھنے کے لیے کھول دیا جاتا ہے۔



#!/usr/bin/perl

سختی سے استعمال کریں ;
استعمال کریں انتباہات ;
5.34.0 استعمال کریں۔ ;
فائل ہینڈل کا استعمال کریں۔ ;

# بنانے کے لیے صارف سے فائل کا نام لیں۔
پرنٹ کریں 'فائل کا نام درج کریں:' ;
میرا $f = <>
چومپ ( $f ) ;

# چیک کریں کہ فائل پہلے سے موجود ہے یا نہیں۔
اگر ( -e$f )
{
# اگر فائل موجود ہے تو ایک پیغام پرنٹ کریں۔
کہنا 'فائل پہلے سے موجود ہے۔' ;
}

اور

{
# فائل ہینڈلر آبجیکٹ بنائیں
میرا $FileHandler = فائل ہینڈل- > نئی ;
کہنا 'فائل میں لکھ رہا ہوں...' ;
# 1 سیکنڈ تک انتظار کریں۔
سونا ( 1 ) ;

#لکھنے کے لیے فائل کھولیں۔
اگر ( $FileHandler- > کھلا ( '>$f' ) )
{
# فائل میں متن کی ایک لائن لکھیں۔
پرنٹ کریں $FileHandler 'یہ ایک آزمائشی پیغام ہے۔ \n یہ دوسری لائن ہے۔ \n ' ;
# فائل ہینڈلر کو بند کریں۔
$FileHandler- > بند کریں ;
}

}

آؤٹ پٹ:



آؤٹ پٹ کے مطابق، 'test.txt' فائل پہلے موجود نہیں تھی اور یہ فائل ٹیکسٹ کی دو لائنوں کے ساتھ بنائی گئی ہے۔ اس کے بعد، 'کیٹ' کمانڈ کو یہ جانچنے کے لیے عمل میں لایا جاتا ہے کہ آیا فائل مواد کے ساتھ کامیابی کے ساتھ بنائی گئی ہے یا نہیں:





  p1-1

اسکرپٹ کو اسی ان پٹ ویلیو کے ساتھ دوبارہ عمل میں لایا جاتا ہے اور 'فائل پہلے سے موجود ہے' پیغام یہاں پرنٹ کیا جاتا ہے کیونکہ 'test.txt' فائل پہلے بنائی جاتی ہے۔



  p1-2

مثال 2: فائل کا مواد پڑھیں

درج ذیل اسکرپٹ کے ساتھ ایک پرل فائل بنائیں جو فائل کے موجود ہونے کی صورت میں 'فائل ہینڈل' کلاس کا استعمال کرتے ہوئے فائل کے مواد کو پڑھے۔ فائل کا نام صارف سے لیا گیا ہے۔

#!/usr/bin/perl

سختی سے استعمال کریں ;
استعمال کریں انتباہات ;
5.34.0 استعمال کریں۔ ;
فائل ہینڈل کا استعمال کریں۔ ;

# بنانے کے لیے صارف سے فائل کا نام لیں۔
میرا $f = <>
میرا $f = ;
چومپ ( $f ) ;

# چیک کریں کہ فائل پہلے سے موجود ہے یا نہیں۔
اگر ( -e$f )
{
#پڑھنے کے لیے فائل کھولیں۔
میرا $FileHandler = فائل ہینڈل- > نئی ( ' <$f' ) ;
# فائل کا مواد پرنٹ کریں۔
پرنٹ کریں < $FileHandler >
# فائل ہینڈلر کو بند کریں۔
$FileHandler کو بند کریں۔ ;
}

آؤٹ پٹ:

'test.txt' فائل کا مواد آؤٹ پٹ میں پرنٹ کیا جاتا ہے کیونکہ یہ موجودہ مقام پر موجود ہے:

  p2

مثال 3: فائل میں مواد شامل کریں۔

مندرجہ ذیل اسکرپٹ کے ساتھ ایک پرل فائل بنائیں جو مواد کو غیر خالی فائل میں شامل کرے اور فائل کے سائز کو بائٹس میں پرنٹ کرے۔ فائل کا نام صارف سے لیا گیا ہے۔ اگر فائل موجود ہے اور ڈیٹا پر مشتمل ہے تو، فائل کے آخر میں متن کی ایک لائن شامل کی جاتی ہے۔ دوسری صورت میں، ایک پیغام پرنٹ کیا جاتا ہے.

#!/usr/bin/perl

سختی سے استعمال کریں ;
استعمال کریں انتباہات ;
5.34.0 استعمال کریں۔ ;
فائل ہینڈل کا استعمال کریں۔ ;

# بنانے کے لیے صارف سے فائل کا نام لیں۔
پرنٹ کریں 'فائل کا نام درج کریں:' ;
میرا $f = <>
چومپ ( $f ) ;

# چیک کریں کہ آیا فائل پہلے سے موجود ہے اور خالی نہیں ہے یا نہیں۔
اگر ( -s $f )
{


میرا $FileHandler = فائل ہینڈل- > نئی ( ' >> $f' ) ;
# فائل کا سائز پرنٹ کریں۔
پرنٹ کریں 'فائل کا سائز ہے' . $FileHandler- > بتانا 'بائٹس۔ \n ' ;
کہنا 'فائل میں مواد شامل کیا جا رہا ہے...' ;
# 1 سیکنڈ تک انتظار کریں۔
سونا ( 1 ) ;

# فائل کے آخر میں مواد لکھیں۔
پرنٹ کریں $FileHandler 'یہ ایک نئی لائن ہے۔ \n ' ;
# فائل ہینڈلر کو بند کریں۔
$FileHandler- > بند کریں ;
}
اور
{
کہنا 'فائل موجود نہیں ہے.' ;
}

آؤٹ پٹ:

آؤٹ پٹ کے مطابق 'test.txt' فائل میں ایک نئی لائن لگائی گئی ہے اور فائل کا سائز 45 بائٹس ہے۔ اس کے بعد، 'کیٹ' کمانڈ کو یہ جانچنے کے لیے عمل میں لایا جاتا ہے کہ آیا مواد کو فائل میں صحیح طریقے سے شامل کیا گیا ہے یا نہیں:

  p3-1

نتیجہ


فائل ہینڈل ماڈیول فائلوں کو پڑھنے، لکھنے یا شامل کرنے کے لیے پرل کے اختیارات میں سے ایک ہے۔ اس ماڈیول کے تین مختلف استعمال اس ٹیوٹوریل میں سادہ مثالوں کا استعمال کرتے ہوئے دکھائے گئے ہیں۔