$dquote()
DESCRIPTION
returns the double quote (") character
SYNOPSIS
$dquote()
ARGUMENTS
none
EXAMPLES
# pikt +C 'output $dquote() . "can i quote you on that?" . $dquote()'
"can i quote you on that?"
check_logfileage(F, S) // warn if log file (F) is not at least (S)
// seconds up-to-date
// remove pesky embedded dquote chars, found especially
// in http access logs
set $line = $substitute($command("=tail -n 1 (F) 2>/dev/null"),
$dquote(), $char(0))
end
if #donote
output mail =newline
output mail "NOTE: " . $dquote() . "CPUCPR" . $dquote() .
" is " . $dquote() . "CPU Cputime Per Realtime" .
$dquote() . " over the most recent interval"
output mail " (i.e., since the last script run)"
fi
if ! #doheader
output mail =newline
=outputfile(mail, "=hstdir/log/top." . $alarm())
output mail =newline
=outputfile(mail, "=hstdir/log/ps." . $alarm())
fi
rule // sum | awk '{print $1 " " $2}' | tr '\012' ' '; ls -l
// producing output like:
// 458 105 -rwxr-x--- 1 root other 53424 Jul 18 22:42 /pikt/bin/pikts
if #split($command("=sum $inlin | =awk " . $squote() .
"{print \$1 " . $dquote() . " " . $dquote() .
" \$2}" . $squote() . " | =tr " . $squote() .
"\\012" . $squote() . " \" . $squote() .
" " . $squote() . "; =lld $inlin")) != 11
output log "=piktfileproblems_log" "ERR: \$command() error for $inlin"
next
fi
set $sum = $1
set $blk = $2
set $size = $7
set $mon = $8
set $date = $9
set $time = $10
// set $name = $11
set #changed = #false()
SEE ALSO
$squote()
$space()
$newline()
$tab()
String Functions
Numerical Functions