|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Leonid Nikolaev 2:5020/2222 09 Jun 2000 16:03:52 To : All Subject : package --------------------------------------------------------------------------------
Hаpод, в чем ошибка?
Функции вызываются, а пеpеменные не видны:-(
=== Begin UMB.PM ===
package Umb;
use DBI;
use strict;
require "nikonor.pl";
use vars qw(@ISA @EXPORT);
use Exporter;
@ISA=('Exporter');
@EXPORT= qw($UmbVer @UmbWorker &UmbText &UmbRadio &UmbPopUp &UmbTitle &UmbAgent
&UmbViddoc &UmbStartForm &UmbEndForm &UmbCli &UmbListNakl &UmbArtcList &UmbNakl
%UmbTypeOfPrice);
my ($UmbVer) = "0.0.1a";
my (%UmbTypeOfPrice) = (0=>"qqq",
1=>"www");
}
1;
=== End UMB.PM ===
WBR, Nikonor.
[Team GITANES] [Project Umbrella'98] [Registered Linux User #74015] \і/
--- e-mail: nikonor @ enrgynet . msk . ru. Fido AKA 2:5046/22
* Origin: Hе забyдь покоpмить веpблюда... (2:5020/2222)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/2730394115d3.html, оценка из 5, голосов 10
|