Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- sub code_stream (&) {
- my $code = shift;
- return sub {
- HTML::Zoom::CodeStream->new({
- code => $code,
- });
- }
- }
- $zoom->select('.item')->repeat(code_stream {
- if (my $name = shift @list) {
- return sub { $_->select('.item-name')->replace_content($name) }
- } else {
- return
- }
- }, { flush_before => $flush });
Add Comment
Please, Sign In to add comment