Revision 74fca575
Von Sven Schöling vor mehr als 13 Jahren hinzugefügt
SL/SEPA.pm | ||
---|---|---|
push @where, 'se.vc = ?';
|
||
push @values, $vc;
|
||
|
||
my $where = ' WHERE ' . join(' AND ', map { "(${_})" } @where) if (@where);
|
||
my $where = @where ? ' WHERE ' . join(' AND ', map { "(${_})" } @where) : '';
|
||
|
||
my $query =
|
||
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.