Most of the common headers have shorter shortcuts. Referer is one of them:

$r->referer("foo");
[download]

-- Randal L. Schwartz, Perl hacker