sub process_search($) { # do stuff } sub search_simple($) { # set parameters return process_search($); } sub search_normal($) { # set parameters return process_search($); } sub search_extended($) { # set parameters return process_search($); }