@goren, @engineer, @4da, чочо в эти выходные сможем сойтись?
My first experience with erotic literature was provided by the Bible. I would sit poring over Old Testament descriptions of lasciviousness, burningly aware of the fundamentalist erection bulging in my trousers while Mother and aunts beamed approval from the living room, sure that I would become a priest.
Хорошая статья про мелоедение: (sci-hub://)http://ncp.sagepub.com/content/22/3/286.long
tl;dr: закусывайте мел мясом, матриархат, хлориды почему-то не в моде, карбонат норм бомжвей, если газы анноят - берите цитрат, без витамина D грустно энивей.
7 декабря , 08:14. Активисты Евомайдана призывают украинцев завалить ГПУ заявлениями о произволе "Беркута". Они ратуют за правовой путь прекращения насилия со стороны силовиков, вместо искушения "выдернуть этому беркуту все перья". Об этом они пишут в Facebook на страничке ЕвроМайдана.
Для этого предлагается осуществить следующие действия:
- распечатать подготовленный активистами шаблон заявления в Генпрокуратуру о противоправных действиях работников спецподразделения "Беркут";
- вписать в заявление свою фамилию;
- лично передать заявление в ведомство на улицу Резницкую, 13/15 во вторник 10 декабря в 10.00 или послать заявление по почте.
Так победим!
WOK мозг самки сделан для манипуляций самцами http://www.psmag.com/culture-society/women’s-brains-are-wired-for-compassion-30951/
Предложил тянке поебаться. Она взяла и не захотела. Сраный матриархат!
Предположим, что появилась технология, позволяющая скопировать-сэмулировать любой мозг (или ЦНС) в ЭВМ. При этом знаний о том, как с результирующим пре-киборгом взаимодействовать, нету: ввод-вывод представляет из себя прямой доступ к любым выбранным нейронам. Загрузили ли бы вы туда свой мозг? Для простоты положим, что большее время выключенным его держать нельзя, как и надолго выкручивать скорость эмуляции вниз-вверх.
Написал прибивалку SIGSTOP'ом firefox при переключении на другой воркспейс. Довольно криво, но работает. Очень актуально.
--{{{ Fuck firefox
myLogHook = do
wsname <- gets (currentTag . windowset)
case wsname of
"web" -> fuckFirefox False
_ -> fuckFirefox True
fuckFirefox ye = liftIO $ do
(rc, out, ) <- readProcessWithExitCode' "pgrep" ["firefox"] []
mapM fuckIt $ lines $ out
where fuckIt s = signalProcess (if ye then sigSTOP else sigCONT) (CPid $ read s)
readProcessWithExitCode'
:: FilePath -- ^ command to run
-> [String] -- ^ any arguments
-> String -- ^ standard input
-> IO (ExitCode,String,String) -- ^ exitcode, stdout, stderr
readProcessWithExitCode' cmd args input = do
(Just inh, Just outh, Just errh, pid) <-
createProcess (proc cmd args){ std_in = CreatePipe,
std_out = CreatePipe,
std_err = CreatePipe }
outMVar <- newEmptyMVar
-- fork off a thread to start consuming stdout
out <- hGetContents outh
forkIO $ C.evaluate (length out) >> putMVar outMVar ()
-- fork off a thread to start consuming stderr
err <- hGetContents errh
forkIO $ C.evaluate (length err) >> putMVar outMVar ()
-- now write and flush any input
when (not (null input)) $ do hPutStr inh input; hFlush inh
hClose inh -- done with stdin
-- wait on the output
takeMVar outMVar
takeMVar outMVar
hClose outh
-- wait on the process
ex <- C.catch (waitForProcess pid >>= return) (\e -> seq (e :: C.SomeException) $ return $ ExitSuccess)
return (ex, out, err)
--}}}
Как в этом языке позвать pgrep?
*System.Posix.POpen> popen "pgrep" ["firefox"] Nothing
Loading package filepath-1.3.0.1 ... linking ... done.
Loading package array-0.4.0.1 ... linking ... done.
Loading package deepseq-1.3.0.1 ... linking ... done.
Loading package old-locale-1.0.0.5 ... linking ... done.
Loading package time-1.4.0.1 ... linking ... done.
Loading package bytestring-0.10.0.2 ... linking ... done.
Loading package unix-2.6.0.1 ... linking ... done.
Loading package directory-1.2.0.1 ... linking ... done.
l29ahZl29ah-t60 ~/.xmonad ‰