use strict;
use Data::Dumper;
use POSIX;
-use CGI qw/-utf8/;
+use CGI;
use CGI::Cookie; # need to check cookies before having CGI parse the POST request
use C4::Auth qw(:DEFAULT check_cookie_auth);
}
$debug and print STDERR "filters: " . Dumper(\%filters);
my $tagloop = get_approval_rows(\%filters);
-for ( @{$tagloop} ) {
- $_->{date_approved} = format_date( $_->{date_approved} );
-}
my $qstring = $input->query_string;
$qstring =~ s/([&;])*\blimit=\d+//; # remove pagination var
$qstring =~ s/^;+//; # remove leading delims