why i can compile PERL script under Linux to binnary?
:
:.. Roman Fordinal
:.: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Friday, February 08, 2002, 2:26:47 PM, you wrote:
>> :.. Roman Fordinal
>> :.. project manager
ML> Well, as a Project Manager you should, perhaps, be a bit more specific
ML> about what you want :-)
sorry, my englisch is too bad for d
>??? print $key.":".$self->{header}->{$key}."\n";
>??? }
bless $self;
return $self;
}
:
:. s pozdravom
:.. Roman Fordinal
:.. project manager
:.:
:.: WebCom s.r.o. - Internet Advertising Agency & Design Studio
:.: S
client wait for "broken
pipe"
:
:. s pozdravom
:.. Roman Fordinal
:.. project manager
:.:
:.: WebCom s.r.o. - Internet Advertising Agency & Design Studio
:.: Stanicna 12, Zohor, Slovakia
:.: Tel: +421.02.65458251, +421.0907.178147
i need get e-mail adrees from string
$email="Name LastName <[EMAIL PROTECTED]>"
to
$email="[EMAIL PROTECTED]"
why get it :
:
:. s pozdravom
:.. Roman Fordinal
:.. project manager
:.:
:.: WebCom s.r.o. - I
why i open socket with Socket(); to host "localhost", protocol "tcp" &
port "110" {for POP3}
i can it make only with
IO::Socket::INET->new(PeerAddr=>$host, PeerPort=>$port, Proto=>$proto);
:
:.. Roman Fordinal
:.: [EMAIL P
ullid|g;
@ref=split(',',$db_micro_line[5]);
$nullid=$ref[0];
if ($nullid<10){$nullid="0$nullid"};
if ($nullid<100){$nullid="0$nullid"};
if ($nullid<1000){$nullid="0$nullid"};
if ($nullid<1){$nullid="0$nullid"};
if ($nullid<10){$nullid="0$nullid"};
if ($nullid<100){$nullid="0$nullid"};
$db_micro1 = $dbh->Query("SELECT ID,small_120x160,original FROM photogallery WHERE
ID='$ref[0]' LIMIT 1");
if (@db_micro1_line=$db_micro1->FetchRow())
{
if ($db_micro1_line[1] eq "Y")
{
@ref=split('x',$db_micro1_line[2]);
@ref=&image_size($ref[0],$ref[1]);
$mdl_temp=~s|||g;
}
else
{
$mdl_temp=~s|||g;
}
}
else
{
$mdl_temp=~s|||g;
}
}
undef %db_micro_line;
undef %db_micro1_line;
undef %ref;
return $mdl_temp}
:
:.. Roman Fordinal
:.: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
y $length=length($mdl_output);
}
:
:.. Roman Fordinal
:.: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
