rashmi_k28, what date subroutine are you talking about? Does it come from CPAN module or your module? Are you talking about the date Linux command line?

my $date = qx/date/;
[download]

Are you looking for the equal of PHP date() function in Perl? There's no such built-in function in Perl, but jettero has shown an example as well. Or, there are various CPAN modules available to work with various aspects of date. You can also use the strftime() function in POSIX.

use POSIX 'strftime';
my $today = strftime '%d-%m-%Y', localtime;
[download]