• 0
aalhanane

جرب بيرل 5 الأن

سؤال

السلام عليكم ورحمة الله تعالى وبركاته

 

 

تريد تجربة سريعة ل perl لكن لاتتوفر على محرك perl

 

يمكنك الأن تجربة كود بسيط لبيرل عبر موقع perltuts

 

الرابط  http://perltuts.com/try

 

 

أمثلة سريعة يمكنك تجربتها : -- قم بنسخها و وضعا في مكان كتابة الكود ثم نفد

 

 

---- تعريف متغير txt تم طباعته

my $txt="Mohammad"; print $txt;

 

 

 FOR

print "\n**** This is an example of the use of the FOR loop on vector of int (example1).***\n\n";   my $i;   for $i (1 , 2 , 3 , 4 , 5)   { print "$i\n"; }

 

 

While
 print "\n**** This is an example of the use of While.***\n\n";      my $counter = 0;      while ($counter <= 5)	{	  print "سطر $counter\n";	  $counter ++;	}   print "End! \n";

 

 

--- Hash ---- FOREACH
my $key;my $value;my %friends = ( ' Sami ' , 20 , ' Amir ' , 24 , ' Karim ' , 25 , ' jeber ' , 28 , ' Salem ' , 27);  print "\n**** This is an example of Hash indexing using FOREACH.***\n";      # FOREACH LOOP ON SORTED VECTOR   print "\nsorted by key\n";      foreach $key (sort keys %friends)	 { 	   print "\t $key is $friends{$key} years old.\n";	 }   	 print "\nsorted by value\n";      foreach $value (sort {$friends{$a} cmp $friends{$b} } keys % friends)	{	  print "\t $value $friends{$value}\n";	}

 

 

شكرا

1

شارك هذا الرد


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

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

لاتوجد إجابات على هذا السؤال حتى الآن .


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

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