Проблема с архивирование

[Biggelow]

Здравствуйте,

Архивирую:
#!/usr/bin/perl
use Archive::Tar;
my $tar = Archive::Tar->new();
$tar->add_files("price.html");#Список файлов
$tar->write("price.tar",1);

В итоге в архиве теряется название price.html, а становится просто price и ко всему прочему добавлет эту фигную в начале текста:

price.html                                                                                          000666  000000  000000        52420 10536207317  13567  0                                                                                                    ustar 00unknown                         unknown                         000000  000000                                                                                                                                                                    

Чего делать знает кто-нибудь?

[NeoNox]

У меня этот скрипт работает как и должен.
Какая версия модуля и какая ос?

[Biggelow]

Windows. А как посмотреть версию модуля?

[Biggelow]

Выставил на хостинг vluehost.ru таже хрень со скриптом!

[NeoNox]

а как ты price.tar открываешь? vluehost.ru - unix?

[NeoNox]

Biggelow:
А как посмотреть версию модуля?

use Archive::Tar;
print $Archive::Tar::VERSION;

[xmolex]

$tar->write("price.tar",1);  
Не используй 1. Пробуй так  $tar->write("price.tar");  
Не сжимает, но зато хоть как-то в виндовсе работает.

[xmolex]

Не стал создавать новую тему. Хочу спросить. А можно ли таром сжимать директории?
add_files насколько я понял работает только с файлами или я ошибаюсь. В perldoc\'e ничего вразумительного не нашел. Может подскажете? Нужно затаровать директорию.