我创建了一个简单的Apple Pay示例:
my $datestring = localtime(time);
print "$datestring\n";
sub demFile {
$dir = "/root/perl/*";
my @file = glob($dir);
foreach(@file) {
$a = scalar(grep $_, @file) . "\n";
return $a;
}
}
$b = demFile();
print $b;
但是,当我尝试点击“取消”按钮(在身份验证,处理等之前)时,它什么也没做;而且我的工资单没有互动(“取消”之后,我无法点击其他元素)。我怎么得到这个问题以及如何解决?