NetBSD/gnu/dist/gawk/test/strftime.awk
wiz 06c09073b3 Initial import of gawk-3.1.3.
Seven releases since the last import, so the ChangeLog is quite big;
please refer to the NEWS file included in the import for details.
Among others, this also addresses PR 23054.
2003-10-06 15:55:26 +00:00

20 lines
504 B
Awk

# strftime.awk ; test the strftime code
#
# input is the output of `date', see Makefile.in
#
# The mucking about with $0 and $N is to avoid problems
# on cygwin, where the timezone field is empty and there
# are two consecutive blanks.
# Additional mucking about to lop off the seconds field;
# helps decrease chance of difference due to a second boundary
{
$3 = sprintf("%02d", $3 + 0)
$4 = substr($4, 1, 5)
print > "strftime.ok"
$0 = strftime("%a %b %d %H:%M %Z %Y")
$NF = $NF
print > OUTPUT
}