VPF::При вызове функции с параметрами error

juno24

Дата 25.11.2009, 20:55 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 25.11.2009

Репутация: нет
Всего: нет

Есть функция

Код


sub add_entry()
{
($user_id,$baner_id,$baner_cost)=@_;
my $entry_description = get_entry_template('0002');
my $today = today();
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
my $time = " $hour:$min:$sec";

$query="insert into money set data=('".$today.$time."'),
                              user_id =('".$user_id."'),
                              baner_id =('".$baner_id."'),
                              summa=('".get_sum_per_day($baner_cost)."'),
                              debet=(''),
                              kredit=(''),
                              description=('".$entry_description."'),
                              system_id=('')";
$sth = $dbh->prepare("$query");
$sth->execute; 
}

Код


add_entry($user_id,$baner_id,$cost);

Но при вызове ее из цикла из другой функции выдает ошибку , не могу понять в чем проблема
Too many arguments for main::add_entry at ./payment.pl line 86, near "$cost)"

Pfailed

Дата 25.11.2009, 21:00 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 933
Регистрация: 19.7.2009

Репутация: 22
Всего: 39

sub add_entry
{
...
}

вместо

sub add_entry()
{
...
}

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

I'm on CPAN
I'm on github

juno24

Дата 25.11.2009, 21:20 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 25.11.2009

Репутация: нет
Всего: нет

Спасибо большое , помогло !!

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »