Lines 193-201
foreach my $report_id (@ARGV) {
Link Here
|
193 |
warn "ERROR: No saved report $report_id found"; |
193 |
warn "ERROR: No saved report $report_id found"; |
194 |
next; |
194 |
next; |
195 |
} |
195 |
} |
196 |
my $sql => $report->{savedsql}; |
196 |
my $sql = $report->{savedsql}; |
197 |
my $report_name => $report->{report_name}; |
197 |
my $report_name = $report->{report_name}; |
198 |
my $type => $report->{type}; |
198 |
my $type = $report->{type}; |
199 |
|
199 |
|
200 |
$verbose and print "SQL: $sql\n\n"; |
200 |
$verbose and print "SQL: $sql\n\n"; |
201 |
if (defined($report_name) and $report_name ne "") |
201 |
if (defined($report_name) and $report_name ne "") |
202 |
- |
|
|