Perl：可以使用變數替換嗎？

在 bash 我做到了

#!/bin/bash
DATE=`date +%m%y`

echo $DATE

在 perl 我試試這個

#!/usr/bin/perl 
$date=`date +%m%y`;
print "date";

並給我..date 字元串而不是正確的日期。

使用localtime()功能：

#!/usr/bin/perl 

use strict;
use warnings;
my $date = localtime();
print "$date";

或者 ：

#!/bin/bash
DATE=`date +%m%y`

echo $DATE

樣本輸出：

1217

應該：

#!/usr/bin/perl 

use strict;
use warnings;
use POSIX qw(strftime);

my $date=`date +%m%y`;
print "$date";

樣本輸出：

1217

使用 print "$date";而不是print "date";

引用自：https://unix.stackexchange.com/questions/412161