#!/usr/bin/perl
# tiesiog spauzdina: dar vienas perl hakeris (*nix)

print chr(68).chr(97).chr(114).
`perl -e 'print" ";'`.chr(118).chr(105).chr(101).chr(110).chr(97).chr(115).`
perl -e 'print" ";'`.chr(112).chr(101).chr(114).chr(108).
`perl -e 'print" ";'`.chr(104).chr(97).chr(107).chr(101).chr(114).chr(105).chr(115)."\n";