Perl
Z wiki linux-user
m (→Pobieranie danych ze standardowego wejścia) |
(→Pobieranie danych ze standardowego wejścia) |
||
| Linia 190: | Linia 190: | ||
W celu testowym możemy zobaczyć co się stanie jeśli odpalimy ten sam program wymazując tylko linijkę chomp($user); | W celu testowym możemy zobaczyć co się stanie jeśli odpalimy ten sam program wymazując tylko linijkę chomp($user); | ||
| + | |||
| + | ==== Operator "diamentowy" ==== | ||
| + | Pobieranie danych z operatora "diamentowego" ''<>'' (znak mniejszości i większości) umożliwia stworzenie programu, który podczas uruchamiania pobierze dodatkowe argumenty ze standardowego wejścia znaczy klawiatury np | ||
| + | ./program test1 test2 | ||
| + | ''test1'' oraz ''test2'' to istniejące pliki. Przykład poniżej powinien rozjaśnić całą zabawę z operatorem diamentowym w perlu. | ||
| + | #! /usr/bin/perl | ||
| + | while (defined($line = <>)) { | ||
| + | chomp($line); | ||
| + | print "Wczytałem wiersz $line \n"; | ||
| + | } | ||
| + | należy pamiętać aby operator ''<>'' użyć w programie tylko jeden raz w innym przypadku pojawią się błędy. | ||
=== Pętla while === | === Pętla while === | ||
