Perl: Skirtumas tarp puslapio versijų
Ištrintas turinys Pridėtas turinys
Nėra keitimo santraukos |
|||
Eilutė 32:
#!/usr/bin/perl
print "Sveikas, Pasauli!\n";
</source>
Dviejų įvestų skaičių sudėtis:
<source lang="perl">
#!/usr/bin/perl
$x = <STDIN>;
$y = <STDIN>;
$z = $x + $y;
print $z;
</source>
Darbas su masyvais:
<source lang="perl">
#!/usr/bin/perl
$x = 0;
print "Įvesk kelis žožius\n";
while ($x < 3) {
@zodziai[$x] = <STDIN>;
$x++;
}
print "Ivedei: @zodziai\n";
</source>
| |||