in reply to Problem Declaring Variable
Try:
GreetZ!,
print "profeth still\n" if /bird|devil/;
&print_report($yesterday); #And in print_report: sub print_report { my $yesterday=shift foreach (sort keys %$today) { print LOG "$_\n" unless exists $yesterday->{$_}; } # etc. etc. etc.
GreetZ!,
- ChOas
print "profeth still\n" if /bird|devil/;
In Section
Seekers of Perl Wisdom