use CGI qw(:standard);

print header(-pragma => 'no-cache');