|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alex Dedul 2:450/82 16 Sep 2002 17:55:04
To : Dmitry Smolin
Subject : __DATA__ blocks & use
--------------------------------------------------------------------------------
Hi, Dmitry !
Помню когда-то , 16 Sep 02 в 14:44, Dmitry Smolin напиcал для Alex Dedul
нижecлeдyющee:
DS>>> И что с того?
AD>> А то что надо это все сделать без
DS>>> sub test {
DS>>> Mod::test();
DS> Так бы и написал (словами, в смысле, а не только в коде).
Был в самых плохих чувствах, думал ничего не выйдет, вот и ж) Однако
после целого дня копаний в доках и экспериментов оказалось что все на самом
деле настолько продумано, что я в очередной раз восхищаюсь эхотагом и Ларри ж).
Просто супер. В одном их следующих писем напишу отчет.
AD>> Если ты заметил, то в __DATA__ у меня будет код, который я хотел
AD>> бы выполнить в самом модуле без дополнительной писанины в главном
AD>> скрипте.
DS> Проблема только в отсутствии писанины в главном скрипте? Хм.
DS> === Cut ===
DS> #!/usr/bin/perl -w
DS> use strict;
DS> use Mod;
DS> __DATA__
DS> print "Ok";
DS> === Cut ===
DS> === Cut ===
DS> package Mod;
DS> use strict;
DS> END {
DS> eval <main::DATA>;
DS> }
DS> 1;
DS> === Cut ===
DS> Так - подойдет?
Лучше, но _уже_ не совсем то. Вообщем если хочешь знать чем все
закончилось, читай дальше.
WBR, Alex
winamp$ my downloads - morcheeba - Otherwise <stopped>
--- GoldED+/W32 1.1.4.7
* Origin: Iron Hills Lab. (2:450/82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
