ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Igor Gerdler 2:5020/400 04 Apr 2002 11:20:12
To : Vladimir Podgorny
Subject : Использование прототипов функций
--------------------------------------------------------------------------------
Добрый день, уважаемый Владимир!
> Сравни (при использовании perl -w и use strict) такие две конструкции:
>
> &subname;
>
> sub subname() {
> my $var = shift;
> ...
> }
>
> и
>
> sub subname($) {
> my $var = shift;
> ...
> }
>
> subname();
>
> IMHO объяснит многое...
Думаю, что не многое :о(
Лучше взять такие варианты:
1.-----------------------
#!/usr/local/bin/perl -w
use strict;
use diagnostics;
sub subname($) {
my $var = shift;
return $var;
}
&subname();
2.-------------------
#!/usr/local/bin/perl -w
use strict;
use diagnostics;
sub subname($) {
my $var = shift;
return $var;
}
subname();
3. -------------------
#!/usr/local/bin/perl -w
use strict;
use diagnostics;
subname();
sub subname($) {
my $var = shift;
return $var;
}
Почитать журнал ошибок и сделать выводы!
Всего доброго!
Игорь Гердлер
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
