- $template->param(rate => $data->{'rate'},
- total => $total);
- # END $OP eq DELETE_CONFIRM
-################## DELETE_CONFIRMED ##################################
-# called by delete_confirm, used to effectively confirm deletion of data in DB
-} elsif ($op eq 'delete_confirmed') {
- $template->param(delete_confirmed => 1);
- my $sth=$dbh->prepare("delete from currency where currency=?");
- $sth->execute($searchfield);
- # END $OP eq DELETE_CONFIRMED
-################## DEFAULT ##################################
-} else { # DEFAULT
- $template->param(else => 1);
-
- my $results = StringSearch($searchfield);
- my $count = scalar(@$results);
- my @loop;
- for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){
- push @loop, {
- currency => $results->[$i]{'currency'},
- rate => $results->[$i]{'rate'},
- symbol => $results->[$i]{'symbol'},
- timestamp => format_date($results->[$i]{'timestamp'}),
- };