view release on metacpan or  search on metacpan

t/config/10-simple.cfg  view on Meta::CPAN

#
# This is just a sample config file that I'm using as a basis.
# It's validated by t/10-validate_simple_cfg.t
#
# Also repeat any changes here in the:  12-alt_symbols_*.cfg
# files.  Those files test preserving this functionality
# using alternate operators.
#

# --------------------------------------------------------------

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.

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}
cmt3 = ${shft333}

# Look up these 3 special perl variables ... (Rule 5)
rule5_pid  = ${$}          # Different per test ...
rule5_prog = ${0}
rule5_os   = ${^O}

# Look up these special variables ... (Rule 6)