現在の年四半期と前月の年四半期の表現を出力することに興味があります。
今日が2012年1月1日の場合、
2012q1
そして
2011q4
それぞれの出力として。
BASH算術評価とGNU date
コマンドを使用した1つの(ちょっと醜い)ソリューション:
echo $(date +%Y)q$(( ($(date +%-m)-1)/3+1 ))
echo $(date -d "-1 month" +%Y)q$(( ($(date -d "-1 month" +%-m)-1)/3+1 ))
%-m
はdate
の0埋め込みを防止するため、これは8月と9月でも機能します。
私の使用 dateutils :
dconv 2012-01-01 -f '%Y%Q'
=>
2012Q1
%q
フラグと%Q
フラグはdateutilsに固有であり、四半期を数値またはQ<NUMBER>
の形式で返します。
たとえば11月など、4で割るすべてのソリューションは失敗します。
% echo $(( 11/4+1 ))
3
正しい数学は次のとおりです。
$(( (m-1)/3 +1 ))
したがって、今月と前月の四半期は次のようになります。
echo curr ${y}q$(((m-1)/3+1))
if [ $m = 1 ]; then
echo prev $((y-1))q4
else
echo prev ${y}q$(((m-2)/3+1))
fi
チェックする値は12だけです、本当に…
% for m in {1..12}; do echo $m Q$(((m-1)/3+1)); done
1 Q1
2 Q1
3 Q1
4 Q2
5 Q2
6 Q2
7 Q3
8 Q3
9 Q3
10 Q4
11 Q4
12 Q4
おそらく、直接的な解決策はありません。
awk
を使用して、非常に多くのバックティックを回避できます。
date +"%Y %m" | awk '{q=int($2/4)+1; printf("%sq%s\n", $1, q);}'
date +"%Y %m" | awk '{q=int($2/4);y=$1;if (q==0){q=4;y=y-1;}; printf("%sq%s\n", y, q);}'
Perl
ソリューションはよりクリーンですが、Perl
とDateTime
は非常に重要な前提条件です。
#!/usr/bin/Perl
use DateTime;
my $today = DateTime->now;
print "today: " . $today->year . "q" . $today->quarter . "\n";
my $ago = DateTime->now->subtract( months=> 4);
print "some time ago: " . $ago->year . "q" . $ago->quarter . "\n"
フォーマットを日付で分割し、awkで計算し、printfでフォーマットします。
date +"%Y %m" | awk '{printf ("%4dq%1d\n", $1, ($2/4)+1)}'
ちょうど日付とbash:
echo $(date +%Yq)$(($(date +%m)/4+1))
好奇心としての代替手段。 GNU awk
が関係する場合、date
は不要です:
awk 'BEGIN{print strftime("%Y")"q"int((strftime("%-m")-1)/3)+1}'
date
を呼び出して現在の年と月を取得し、残りをシェルの算術で実行します。
set $(date '+%Y %m');
this_quarter=${1}q$(($2 / 4 + 1))
if [ $2 -eq 1 ]; then
last_month_quarter=$(($1 - 1))q4
else
last_month_quarter=${1}q$((($2 - 1) / 4 + 1))
fi
今四半期と先月の四半期の基本的な計算:
y1=$(date +%Y)
m1=$(date +%m)
q1=$(( (m1 - 1) / 3 + 1))
y2=$(( y1 - (m1 == 1) ))
m2=$(( (m1 + 10) % 12 + 1 ))
q2=$(( (m2 - 1) / 3 + 1 ))
echo This Quarter: $((y1))q$q1
echo Last Month Quarter: $((y2))q$q2
スクリプトは次の部分を使用します。
%q
この情報を表示する形式。
2016年11月30日の coreutils-8.26リリースログ から:
新機能
...
dateは%q形式を受け入れて、四半期を出力するようになりました。
そしてはい、それはうまくいきます!
$ date "+%q"
4
$ date "+%Yq%q"
2016q4
今月の四半期
date +"%Yq$(expr $(expr $(date +%m) - 1) / 3 + 1)"
昨月の年四半期
date +"%Yq$(expr $(expr $(date -d '-1 month' +%m) - 1) / 3 + 1)"
ISO週カレンダーに基づくfiscal 13週間の四半期が必要な場合、残念ながら、新しい便利な%qは機能しません。以下は、awk/strftimeを使用した@manatworkの日付のないソリューションのバージョンです。
awk 'BEGIN{$x=int((strftime("%V")-1)/13)+1;print strftime("%G")"q"($x>4?4:$x)}'
最後の小さな3値ビットは、最後の四半期が14週間あるISOうるう週を扱います。