#!/usr/bin/perl 
use strict;
use warnings;
use Carp;
use Date::DateCalc;

 <code> $date=new Date::Convert::Julian(1997, 11, 27);
        @date=$date->date;
        print $date->date_string, "\n";