my $yesterday = DateTime-> now(time_zone=>'Asia/Calcutta')->subtract( days => 1 );

my $y_month = $yesterday->month;
my $y_year = $yesterday->year;

if ($y_month < 10){
$y_month = "0".$y_month;
}

my $finaldt1 = $y_year."-".$y_month."-01";
my $finaldt2 = $yesterday->ymd;