В поисках ошибок

[Aib]

Народ, плиз, взгляните свежи взором, чего Я тут наврал. Скрипт должен передать флэшке несколько переменных, а вместо этого открывает новую страницу и в ней текст выводит

---------------------------------------------

#!usr/local/bin/perl -w

use CGI;

CGI::ReadParse(*in);
$name = $in('name');
$role = $in('role');
$data = $in('data');

.................

# Обработка переменных, там ошибки явно нет.

.................

print header('text/html'),
name=$name&role=$role&data=$data;
exit 0