Perl/Tablice: Różnice pomiędzy wersjami

Usunięta treść Dodana treść
Linia 114:
Mamy dwa sposoby pokazywania wartości, jakie są w tablicy. Możesz zarówno wyświetlać listę elementów bezpośrednio lub możesz ją wstawić w łańcuchu znaków z podwójnymi cudzysłowiami.
 
<tt>@namesimiona = qw/Paul Michael Jessica Megan/;
print "MyMoje names areimiona: ", @namesimiona, ".\n";
print "MyMoje names areimiona: @namesimiona.\n";</tt>
 
W pierwszym przykładzie funkcja <tt>print</tt> bierze listę z 6 argumentami: napis 'MyMoje names areimiona: ', każdy z czterech wartości w <tt>@namesimiona</tt> i tekst ".\n". Każdy argument jest podczas wyświetlania oddzielony od siebie wartością zawartą w zmiennej <tt>$,</tt> (domyślna wartość jest pustym tekstem), w tym przykładzie wartości znajdujące się w tablicy zostaną 'zmiażdżone' razem:
MyMoje names areimiona: PaulMichaelJessicaMegan.
 
W drugim przykładzie funkcja <tt>print</tt> bierze bezpośrednio jeden argument: łańcuch znaków, który przechowuje zinterpolowaną tablicę. Kiedy Perl interpoluje tablice, wynikiem jest łańcuch znaków zawierający wszystkie wartości tablicy, oddzielone wartością znajdującą się w zmiennej <tt>$"</tt> (która domyślnie przechowuje pojedyńczą spację):
MyMoje names areimiona: Paul Michael Jessica Megan.
 
{| WIDTH="75%" | style="background-color: #f2fff2; border: solid 1px #bfffbf; padding: 1em;" valign=top|
|'''Uwaga'''</br>''Zarówno zmienna <tt>$,</tt>, jak i <tt>$"</tt> mogą być zmienione na dowolny łańcuch znaków np. chcemy odzielić elementy tablicy od siebie przecinkiem''
<tt>$" = ', ';
print "MyMoje names areimiona: @namesimiona.\n";</tt>
MyMoje names areimiona: Paul, Michael, Jessica, Megan.
|}