Miresevini, Vizitor. Ju lutemi identifikohuni ose regjistrohuni.


Identifikohuni me emrin, fjalekalimin dhe kohen e identifikimit

AlbtuX  |  Gjuhet Programuese | Programimi  |  PHP, CGI, Perl, Python, ASP (VB- dhe Jscript)  |  Funksionet next dhe last në Perl
Faqe: [1]
  Printo  
Autor Teme: Funksionet next dhe last në Perl  (Lexuar 483 here)
0 Anetare dhe 1 Vizitor po shikojne kete teme.
alko
Moderator i pergjithshem
Jr. Member
*****
Postime: 60


AlbtuX


WWW
« : 09 Janar 2010, 09:40:46 pm »

 Pasi që te programi i parë
Kodi:
hello.pl
, theksuam se Perl ka mjaft ngjashmëri me gjuhën programuese C, atëherë nënkuptohet se edhe këtu do të jenë të pranishme harqet. Me ndihmën e dy funksioneve next dhe last, mund të drejtohet harku (schleife) ashtu si ne dëshirojmë.

Kështu psh mundet një hark të kalohet apo të përfundohet(mbyllet) para kohe. Hapim një gedit dhe shkruajmë:
Kodi:
#!/usr/local/bin/perl -w
use strict;
for(my $i = 0; $i < 25; $i++) { print "$i " }
print "\n";
for(my $i = 0; $i < 25; $i++) {
if($i == 6) { next } # '6' kalohet

print "$i ";
}
print "\n";
for(my $i = 0; $i < 25; $i++) {
if($i == 7) { last } # tek '7' nderprehet
print "$i ";
}
print "\n";
e titullojmë sipas dëshirës
Kodi:
harku.pl
. E bëjmë të ekzekutueshme:
Kodi:
chmod u+x harku.pl
E ekzekutojmë në terminal:
Kodi:
perl harku.pl
dhe do të kemi rezultatin:
Kodi:
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
0 1 2 3 4 5 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
0 1 2 3 4 5 6
Citim
e Premte, 03/07/2009 - 14:00 — alko
Identifikuar

I gjithe materiali ne kete teme është i lëshuar nën licensën .
AlbtuX
   

 Identifikuar
Faqe: [1]
  Printo  
 
Shko te:  

Powered by SMF 1.1.11 | SMF © 2006-2009, Simple Machines LLC | Takime Forum | Twitter | Flickr | ALBTUX