myExamplesPL/030-HEREDOC-MultiLineText.pl at master · ondrej-duras/myExamplesPL · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#!/usr/bin/perl

# Viacriadkove textove premenne - Templaty
# ... vygooglis ako "HEREDOC" hodnoty

$PREMENNA="ahoj ahoj ahoj";

# interpolovany - to znamena, ze premenne vo vnutri
# su nahradene hodnotami
$VZOR1 = <<_VZOR1_;
Tento text ma viac riadkov
a obsahuje aj premenne
Napriklad ${PREMENNA}
sa tu moze
---
_VZOR1_

# toto je taktiez interpolovany vzor
# len je to inak napisane - s uvodzovkami
$VZOR2 = <<"_VZOR2_";
Tento text ma viac riadkov
a obsahuje aj premenne
Napriklad ${PREMENNA}
sa tu moze
---
_VZOR2_

# a toto je neinterpolovany text
# cize premenne v nom niesu prekladane na ich hodnoty
$VZOR3 = <<'_VZOR3_';
Tento text ma viac riadkov
a obsahuje aj premenne
Napriklad ${PREMENNA}
sa tu nemoze.
Toto sa pouziva na dlhe predlohy obsahujuce
vela riadiacich znakov v povodnom zneni,
hlavne dolarov
---
_VZOR3_


print $VZOR1;
print $VZOR2;
print $VZOR3;

# --- end ---