Guest User

Untitled

a guest
Jul 19th, 2018
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.32 KB | None | 0 0
  1. sub code_stream (&) {
  2. my $code = shift;
  3. return sub {
  4. HTML::Zoom::CodeStream->new({
  5. code => $code,
  6. });
  7. }
  8. }
  9.  
  10. $zoom->select('.item')->repeat(code_stream {
  11. if (my $name = shift @list) {
  12. return sub { $_->select('.item-name')->replace_content($name) }
  13. } else {
  14. return
  15. }
  16. }, { flush_before => $flush });
Add Comment
Please, Sign In to add comment