|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Nikolay Leschev 2:5020/400 22 Dec 2003 14:12:23
To : Sergey E.Sumin
Subject : Re: программа выаодящая свой исходный текст
--------------------------------------------------------------------------------
Sergey E.Sumin wrote:
> Здравствуйте.
>
> "Nikolay Leschev" <kl@vi-mail.ru> wrote in message
> news:3FE5B3FF.5030703@vi-mail.ru...
>
>>тут вот такой вопрос возник как написать программу выводящую саму себя у
>>меня пока так получилось помогите сделать короче
>>
>>$s='print "\$s=\x27$s\x27;$s";';print "\$s=\x27$s\x27;$s";
>>
>
>
> Ты для начала определись, что тебе нужно, написать программу,
> которая печатает сама себя
> или программу, печатающую текст
> $s='print "\$s=\x27$s\x27;$s";';print "\$s=\x27$s\x27;$s";
>
> Если тебе надо первое, надо писать что-то вроде
>
> open IN, $0; print <IN>;
>
надо что бы программа выводила свой исходный код(без разницы какой), но
к самому файлу обращатся нельзя
--- ifmail v.2.15dev5.1
* Origin: Communication Company MARK-ITT (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
