ocehb | Jun. 26th, 2006

если у вас есть фортунки, но нет fortune...


# perl -e '$/ = "%\n"; rand($.) < 1 && ($line = $_) while <>;
 chomp $line; print $line;' \
  /usr/share/games/fortune/fortune-rus
Дон Кихот:
- Санчо - ты мне друг?
Санчо:
- Нет уж, Дон - хватит! Давай до баб доедем!!!
# perl -e '$/ = "%\n"; rand($.) < 1 && ($line = $_) while <>;
 chomp $line; print $line;' \   
  /usr/share/games/fortune/*
If you think nobody cares if you're alive, try missing a couple of car
payments.
                -- Earl Wilson
#

S	M	T	W	T	F	S
					1	2
3	4	5	6	7	8	9
10	11	12	13	14	15	16
17	18	19	20	21	22	23
24	25	26	27	28	29	30
31

Most Popular Tags

#print - 1 use
#title - 1 use
benchmark - 1 use
c - 2 uses
computer - 2 uses
cpan - 1 use
crc10 - 1 use
crypto - 1 use
cryptopro - 1 use
expect - 1 use
fortune - 1 use
fortunes - 1 use
fun - 2 uses
gnupg - 1 use
help - 1 use
history - 1 use
human resources - 1 use
humor - 42 uses
job - 4 uses
job humor - 1 use
keyboard layout - 1 use
let's encrypt - 1 use
linux - 2 uses
ms - 1 use
music - 2 uses
musiikki - 1 use
network - 2 uses
perl - 96 uses
perl regexp - 7 uses
reading - 1 use
regexp - 5 uses
rfc - 1 use
rpm - 1 use
scripting - 1 use
selinux - 1 use
shell - 15 uses
sim-icq - 1 use
spb - 1 use
sw testing - 1 use
systemd - 2 uses
unix - 12 uses
unix mail - 2 uses
url - 2 uses
zsh - 18 uses
zsh pcre - 1 use
zshell - 5 uses
бэз мэток - 2 uses
кино - 2 uses
работа - 2 uses
тест - 1 use

Записки проperl

Jun. 26th, 2006

Jun. 26th, 2006

perl fortune

Profile

January 2021

Most Popular Tags

Page Summary

Style Credit

Expand Cut Tags