sub search { my $wanted = shift; foreach my $path (@_) { print "Searching in '$path'\n"; find($wanted, $path); } } #### paths.each do |path| puts "Searching in %{path}" find(wanted, path) end #### irb(main):006:0> wanted = "c" => "c" irb(main):021:0> def search (paths, &block) irb(main):022:1> paths.each &block irb(main):023:1> end irb(main):028:0> search ["a", "b", "c"] do irb(main):029:1* |path| irb(main):030:1* puts "Searching in #{path}" irb(main):031:1> puts wanted == path irb(main):032:1> end Searching in a false Searching in b false Searching in c true