Код: Выделить всё
1;man perl , я думаюProFTP писал(а):как тут быть, может модуль есть какой-то, подскажите пожалуйста...
error.log? перл не так прост как пхп, но его возможности намного выше, важно только правильно подобрать подход к его изучению.ProFTP писал(а):на php сразу показывает в каком файле ошибка
он выдает фатальную ошибку и пишет что ошибка в модульном файле и всё...ProFTP писал(а): error.log? перл не так прост как пхп, но его возможности намного выше, важно только правильно подобрать подход к его изучению.
Код: Выделить всё
package test;
use strict;
sub new {
my $check = shift;
my $class = ref( $check ) || $check;
my $Name = shift || "NoName";
my $Me = {
_Name => $Name,
};
bless($Me,$class);
return $Me;
}
sub TestPrint{
my $Me = shift;
print $Me->{_Name};
}
1;
Код: Выделить всё
#!/usr/bin/perl -w