Revision 74fca575
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| SL/SEPA.pm | ||
|---|---|---|
| 305 | 305 |
push @where, 'se.vc = ?'; |
| 306 | 306 |
push @values, $vc; |
| 307 | 307 |
|
| 308 |
my $where = ' WHERE ' . join(' AND ', map { "(${_})" } @where) if (@where);
|
|
| 308 |
my $where = @where ? ' WHERE ' . join(' AND ', map { "(${_})" } @where) : '';
|
|
| 309 | 309 |
|
| 310 | 310 |
my $query = |
| 311 | 311 |
qq|SELECT se.id, se.employee_id, se.executed, se.closed, itime::date AS export_date, |
Auch abrufbar als: Unified diff
Fixes für das "my $var if $cond;" pattern.