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