I assume you're using the CGI module, importing its header() function. Unfortunately, you're defining your own function with the same name. Perl has no way to distinguish the two, and the most-recently-defined function wins, as Aristotle points out. If you had warnings enabled, Perl would have told you that header() was redefined.