At last after a long fight I figured it out. It was due to defining the egal sub which is like:

sub egal () {
     # ....
}
[download]

# Rather than:

sub egal {
     # ....
}
[download]

This was imposing argument prototypes on egal (i.e. no args). This was the reason why Perl can't find the sub when an argument is passed.