login::  password::




cwbe coordinatez:
101
792011
3769360
5300117
5300190

ABSOLUT
KYBERIA
permissions
you: r,
system: public
net: yes

neurons

stats|by_visit|by_K
source
tiamat
K|my_K|given_K
last
commanders
polls

total descendants::11
total children::1
1 K

show[ 2 | 3] flat






000001010079201103769360053001170530019005300249
Harvie
 Harvie      19.04.2010 - 18:20:41 (modif: 19.04.2010 - 18:26:01) [1K] , level: 1, UP   NEW !!CONTENT CHANGED!!
http://d.hatena.ne.jp/acotie/20080803/1217745106
output.jpg
kdo chce detekovat vlastni patterny (nejen obliceje), musi vytvorit vlastni haarcascade pomoci haartrainingu:
http://www.computer-vision-software.com/blog/2009/11/faq-opencv-haartraining/
http://note.sonots.com/SciSoftware/haartraining.html

#!/usr/bin/perl                                                           
use strict;                                                               
use warnings;                                                             

use Imager;                                                               
use Image::ObjectDetect;                                                  

my $file = 'input.jpg';                                                 
my $image = Imager->new->read(file => $file);                             

my @cascades = (
	'/usr/share/opencv/haarcascades/haarcascade_frontalface_default.xml',
	'/usr/share/opencv/haarcascades/haarcascade_frontalface_alt.xml',
	#'/usr/share/opencv/haarcascades/haarcascade_frontalface_alt2.xml',
	'/usr/share/opencv/haarcascades/haarcascade_frontalface_alt_tree.xml',
);

my @faces;
foreach(@cascades) {
	my $detector = Image::ObjectDetect->new($_);                        
	push (@faces, $detector->detect($file));
}

for my $face (@faces) {                                                   
    my $file2 = 'face.jpg';                                             
    my $image2 = Imager->new->read(file => $file2);                       
    $image2 = $image2->scale(xpixels => $face->{width}, ypixels => $face->
{height});                                                                
    $image->paste(left => $face->{x}, top => $face->{y}, src => $image2); 
}                                                                         

$image->write(file => 'output.jpg'); 

00000101007920110376936005300117053001900530024905302376
       20.04.2010 - 17:58:50 , level: 2, UP   NEW
z toho perlu je mie nevolno :)

^..^
>U<

0000010100792011037693600530011705300190053002490530237605302771
Harvie
 Harvie      20.04.2010 - 21:48:47 , level: 3, UP   NEW
ja sem ho jenom castecne upravil, nektery kostrukce se mi taky nelibi a to jsem docela zacatecnik... co by jsi zmenil ty?

000001010079201103769360053001170530019005300249053023760530277105303454
       21.04.2010 - 10:15:19 , level: 4, UP   NEW
jazyk za stare dobre c++ ;P

^..^
>U<

00000101007920110376936005300117053001900530024905302376053027710530345405303962
Harvie
 Harvie      21.04.2010 - 14:02:28 , level: 5, UP   NEW
z toho C++ je mie nevolno :)
jazyk za starsi lepsi ANSI C ;-P

0000010100792011037693600530011705300190053002490530237605302771053034540530396205304108
       21.04.2010 - 15:13:41 , level: 6, UP   NEW
to je mi uz prilis ortodoxne ;)

^..^
>U<

000001010079201103769360053001170530019005300249053023760530277105303454053039620530410805304118
Harvie
 Harvie      21.04.2010 - 15:18:25 , level: 7, UP   NEW
tak si nehraj na geeka :-P

00000101007920110376936005300117053001900530024905302376053027710530345405303962053041080530411805304130
       21.04.2010 - 15:26:47 , level: 8, UP   NEW
;)

^..^
>U<

0000010100792011037693600530011705300190053002490530237605302771053034540530396205304108053041180530413005304387
idecko
 idecko      21.04.2010 - 17:34:15 , level: 9, UP   NEW
;)
a co si Ty dnes urobil pre svojho zamestnavatela?

00000101007920110376936005300117053001900530024905300525
Harvie
 Harvie      19.04.2010 - 20:41:29 (modif: 19.04.2010 - 20:44:18), level: 2, UP   NEW !!CONTENT CHANGED!!
Napadá mě jisté využití...
Často jsem viděl fotky z akcí, kde účastníci nechtějí prozradit svoji totožnost (není se čemu divit, když facebook má databázi přesně vyznačených obličejů z většiny fotek) a tak organizátor/fotograf vyměnil obličeje za g.bushe nebo jineho oblibeneho politika:
paroubek-ilumfcz.jpg
Pokud tedy nechcete, aby vás paroubek na internetu (na facebooku) viděl, jak děláte nepřístojnosti, můžete se zamaskovat pomocí skriptu nahoře:
out2m.jpg
Samozřejmě pomocí find|xargs to lze provést rekurzivně nad celou složkou fotografií s využitím několika procesorů.

00000101007920110376936005300117053001900530024905300267
Harvie
 Harvie      19.04.2010 - 18:30:56 [1K] , level: 2, UP   NEW
Jinak pro ty, co nevi:
http://en.wikipedia.org/wiki/Laughing_Man_(Ghost_in_the_Shell)
GITS_Laughing_Man_Animated_6977.gif