$expiration_obj = expire_date( 'microsoft.com' );
        $expiration_str  = expire_date( 'microsoft.com', '%Y-%m-%d' );
        $expiration_obj = expdate_int( $whois_text, 'com' );
        $expiration_str  = expdate_fmt( $whois_text, 'ru', '%Y-%m-%d' );

##</code><code>##

# perl -MNet::Domain::ExpireDate -e 'print expire_date("microsoft.com","%Y-%m-%d"),"\n"'
2021-05-03