qse/ase/cmd/awk/t38.awk

10 lines
200 B
Awk
Raw Normal View History

BEGIN {
split (" a b c d e ", x, "");
for (j in x) print j "->" x[j];
print "-------------------";
split ("a b c d e", x, "b c");
for (j in x) print j "->" x[j];
print "-------------------";
}