Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- It should be used like this:
- my $productIterator = WebGUI::Asset::Product->getIsa($session);
- ASSET: while (1) {
- my $product = eval { $productIterator->() };
- if (my $e = Exception::Class->caught()) {
- $session->log->error($@);
- next ASSET;
- }
- last ASSET unless $product;
- ##Do something useful with $product
- }
Add Comment
Please, Sign In to add comment