view release on metacpan or  search on metacpan

t/config/30-alt_symbols_03.cfg  view on Meta::CPAN

?
? This is just a sample config file that I'm using as a basis.
? It's validated by t/30-alt_symbols_cfg.t
?
? Any changes made to this config file should also be refleced
? in:  t/config/10-simple.cfg
? That config file is used to validate this one!
?
? --------------------------------------------------------------
?   The required substitutions ...
?     Assignment (=)     ==>  :=
?     Comments   (#)     ==>  ?
?     Variables (${..})  ==>  $[..]
?     Quotes    (' or ") ==>  @..@
? --------------------------------------------------------------

section_03 := This is a long section name!
section_04 := This is an empty section!

[ $[section_04] ]

[ $[section_03] ]

a := @A is for Apple!@

           b       :=       B is for Bat!    ? A comment

c:=@C is for Cat!@    ? Another comment

? Another comment ...
d :=D is for Dog!     ? Comment (????) ...

e := @E is for Elephant!@

f := 'F is for Frog!"   ? Unbalanced Quotes are not removed. (can't implement)

g := G is for Gold Fish!

g := $fooled you        ? Not a variable substitution!

h_pwd := @Hello World!@    ? Should@t appear in fish.

? --------------------------------------------------------------

one := ONE
two := TWO
three := THREE

? All 3 evaluate to the same value ...
number 1 := @$[one] $[two] $[three]@
number 2 := @$[one] $[two] $[three]@
number 3 :=  $[one] $[two] $[three]

? All 3 evaluate to the same value again ...
number 6 := @$[one] $[two] $[three]@    ? A comment ...
number 5 := @$[one] $[two] $[three]@    ? A comment ...
number 4 :=  $[one] $[two] $[three]     ? A comment ...

number 8 := $[number 1]

rule8 missing := $[undefined]    ? Returns @@ as it@s value.

? Testing the special variables ... (Rule 0)
shft3 := @zzzzzzzzz@         ? Line should be ignored!

cmt  := $[shft3]
cmt2 := $[shft33]