dmalikov

What is going on here is creating 2 streams with numbers from 1 to 100000 sorting randomly and finding with grep all lines that each of them contains. All of them, actually. -c flag is a shortcut for `| wc -l`, nothng more.

$> n=100000; time grep -f <(seq 1 $n | sort -R) <(seq 1 $n | sort -R) -c 
100000
grep -f <(seq 1 $n | sort -R) <(seq 1 $n | sort -R) -c  148.65s user 0.28s system 98% cpu 2:31.89 total


$> n=100000; time grep -xF -f <(seq 1 $n | sort -R) <(seq 1 $n | sort -R) -c 
100000
grep -xF -f <(seq 1 $n | sort -R) <(seq 1 $n | sort -R) -c  0.34s user 0.01s system 26% cpu 1.315 total

dmalikov

open System
open System.Net
 
type Stock(symbol : string) = class
    let url =
        "http://download.finance.yahoo.com/d/quotes.csv?s=" + symbol + "&f=sl1d1t1c1ohgv&e=.csv"
 
    let mutable _symbol = String.Empty
    let mutable _current = 0.0
    let mutable _open = 0.0

dmalikov

#!/bin/bash

# wow so bash such fast very O(n^2*log(n)^2)

for author in `git log --format='%ae' | sort -u`; do
    changes=`git log --author=$author --pretty=tformat: --numstat | awk '{ add += $1 ; subs += $2 } END { printf "%s ++ / %s --\n",add,subs }'`
    commits=`git log --author=$author --oneline | wc -l`
    echo "$author: $commits commits / $changes"
done | sort -rn -k2

dmalikov

PS > "m" -contains "m"
True
PS > "a b m" -contains "m"
False

dmalikov

#!/usr/bin/perl
$_='
         $q ="\                   47"; wh
        ile                           ($ ;=
      $z                +=              .5 ){
    %c=           $r=0;$/ ="";whi         le(2
   0+          $z>($;+=.05)){$c{int$       _+ 2
  6+         2*($              r+= .0       2) *
 s          in$                   ;}{1       -$_
+1         0+           int        $r*c       o s

dmalikov

PS C:\> { param($x) { param($y) $x + $y } }.Invoke(10).Invoke(20)
20
PS C:\> { param($x) { param($y) $x + $y }.GetNewClosure() }.Invoke(10).Invoke(20)
30

PS C:\> ({ param($x) { param($y) $y * $x } }.Invoke(10).Invoke(20)) -eq 0
True
PS C:\> ({ param($x) { param($y) $x * $y } }.Invoke(10).Invoke(20)) -eq $null
True

dmalikov

$ cat function.ps1
function f() {
    { param($x) "expected output" }.Invoke()
}

function g() {
    { param($x) "unexpected" }.Invoke()
    return "output"
}

dmalikov

$ powershell ./wut.ps1
String is null
String is null
String is empty

dmalikov

module Eu where

import           Control.Applicative ((<$>))
import           Data.Function       (on)
import           Data.List           (groupBy, intercalate)
import           Data.List.Split     (splitOn)
import qualified Data.Map            as M
import           Data.Maybe          (mapMaybe)

main :: IO ()

dmalikov

Various blog posts related to Nix and NixOS

---

General

• https://nixos.org/wiki/Main_Page Nix wiki. Awesome resource containing huge amount of manuals and documentation with examples.
• http://aflatter.de/nixos/ Alexander Flatter - NixOS. Installing NixOS inside a VirtualBox with a real-world configuration.nix example.
• http://lethalman.blogspot.it/search/label/nixpills Luca Bruno - Nix Pills. Series of posts describing how to install nix into some environment and how to use it.
• http://looprecur.com/blog/from-ubuntu-to-nixos/ Tim Sears - From Ubuntu to NixOS. Talk about experience migrating from Ubuntu to NixOS.