Help for this page
#!/usr/bin/perl -w ... # or any other combination you can think of. }
sub contains { ... ... }