mirror of
https://github.com/johnkerl/miller.git
synced 2026-01-24 02:36:15 +00:00
77 lines
1.8 KiB
Text
Executable file
77 lines
1.8 KiB
Text
Executable file
run_mlr() {
|
|
echo
|
|
echo ................................................................
|
|
echo mlr "$@"
|
|
./mlr "$@"
|
|
# ./vgrun ./mlr "$@"
|
|
}
|
|
|
|
run_mlr_for_auxents() {
|
|
echo
|
|
echo ................................................................
|
|
echo mlr "$@"
|
|
./mlr "$@"
|
|
}
|
|
|
|
run_cat() {
|
|
echo cat "$@"
|
|
echo cat "$@" >> $outfile
|
|
cat "$@" >> $outfile
|
|
echo >> $outfile
|
|
}
|
|
|
|
mlr_expect_fail() {
|
|
echo
|
|
echo ................................................................
|
|
echo mlr "$@"
|
|
mlr "$@"
|
|
status=$?
|
|
if [ $status -ne 1 ]; then
|
|
echo "Exit status was $status; expected 1."
|
|
fi
|
|
}
|
|
|
|
announce() {
|
|
echo
|
|
echo "================================================================"
|
|
echo "$@"
|
|
echo
|
|
}
|
|
|
|
mention() {
|
|
echo
|
|
echo ---------------------------------------------------------------- "$@"
|
|
}
|
|
|
|
# ================================================================
|
|
flags="-a"
|
|
|
|
# ================================================================
|
|
#vee=-v
|
|
vee=
|
|
|
|
# ----------------------------------------------------------------
|
|
|
|
run_mlr --opprint put '$a = $[[2]]; unset $["a"]' s
|
|
run_mlr --opprint put '$[[1]] = $b; unset $[[1]]' s
|
|
run_mlr --opprint put '$[[1]] = $[[2]]; unset $["a"]' s
|
|
|
|
run_mlr --c2p cat input.txt
|
|
|
|
run_mlr --c2p put '$[[3]] = capitalize($[[3]])' input.txt
|
|
run_mlr --c2p put '$[[[3]]] = capitalize($[[[3]]])' input.txt
|
|
|
|
run_mlr --c2p put '$foo = capitalize($[[3]])' input.txt
|
|
run_mlr --c2p put '$foo = capitalize($[[[3]]])' input.txt
|
|
|
|
run_mlr --c2p put '$[[3]] = "NEW"' input.txt
|
|
run_mlr --c2p put '$[[[3]]] = "NEW"' input.txt
|
|
|
|
|
|
run_mlr --opprint put '$new1=$[[1]]; $[[11]]=$[[2]]' s
|
|
run_mlr --opprint put '$new1=$[[1]]; $[[2]]=$[[11]]' s
|
|
|
|
run_mlr --opprint put 'unset $c' s
|
|
run_mlr --opprint put 'unset $c; $c="new"' s
|
|
run_mlr --opprint put '$c=$a.$b; unset $c; $c="new"' s
|
|
run_mlr --opprint put '$c=$a.$b; unset $c' s
|