• 0
rullzing

كيف يمكنني منع التكرار في البيرل؟

سؤال

السلام عليكم

شباب انا سويت سكربت

استخدمت while و ARGV ليبحث عن شيء محدد في صفحه محدده ويكتبه لي

لكن المشكله ان الصفحه فيها تكرار

يعني مثلا

مكتوب

ahmad is very good guy

ahmad is great guy

انا جعلت السكربت يبحث عن كلمة ahmad

فـ الناتج يكون

ahmad

ahmad

انا ابغاه يظهر ahmad وحدة حتى لو الصفحة تحتوي على 20000 ahmad

كيف اقدر اسويها؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

5 إجابة على هذا السؤال .

  • 0

انظر ستجه شئ يشابه ما تريد بشكل كبير

http://ilovethecode.com/Perl/Perl-Tutorials-How_To-Easy/Exit_a_Loop_with_Last.shtml

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخوي القيمه محددة كـ متغير مجهول

ماتوقع الطريقة هذه بتظبط

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يمكنك استخدام الامر

last;

وتحديده مثل الامر ;break فى لغة الC

مثال

#!/usr/bin/perl

use strict;
use warnings;

open my $fh, '<', "data.log.1" or die "could not open data.log.1: $!\n";
chomp( my @Mohamed= <$fh> );
close $fh or die "could not close data.log.1: $!\n";

for my $Mohamed( @ducks ){
print "$Mohamed\n";
if( $duck eq "#s2" ){
print "match\n";
last;
}
}

هذا مثال أخر يمكن ان يكون اوضح

FOO: { 
for my $i ( @listone ){
for my $j ( @listtwo ){
if ( cond( $i,$j ) ){

last FOO; # --->
# |
} # |
} # |
} # |
} # <-------------------------------

2

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يعطيك العافية ماقصرت :) احلى تقييم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يعطيك العافية ماقصرت :) احلى تقييم

شكرا لك اخي الحبيب

تحياتي لك

وأرجو الا تكون ضيفا بل عضوا متميز ان شاء الله

مرحبا بك معنا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .