function ol {
    local NAME="$1"
    shift
    eval perl $(grep '^'"$1"'\>' ~/oneliners|cut '-d ' -f2-) "$@"
}

##</code><code>##

col1 -naleshift@F;print"@F"
rmcr -i -pes/\r//
2spc -pe$_.=$/