/* Everything you need to know about me can be found in the code below. */

[marek.schor@webline.cz ~]# cat ./my_mind.pl

#!/usr/bin/perl

use man qw( Marek Schoř Brno CZ :DEFAULT );

=head IT specialist
- enterprise infrastructure administrator - independent network management of 14 branches / more than 500 users / more than 20 years
- senior software developer - several independent extensive projects, other projects for important financial companies (Partners, Generali, J&T)
- trader in currency, commodity and index markets - 15 years of experience

- developer of trading systems and tools - link to the current project at the bottom of the page - msdb.info

=cut

my @professional_services = (
    'linux servers and clients',
    'windows servers and clients',
    'synology',
    'LAN / WAN network services',
    'local and remote user support'
); # and much more

my @professional_development = (
    'perl',
    'mql4 / mql5',
    'I use git'
); # and I'm still learning

my @important_experiences = (
    'c / python / javascript / rust',
    'mysql / postgresql / sqlite for independent applications / ms sql / firebird',
    'firewalls - juniper is best',
    'cisco / allied telesis / hp networking components / mikrotik',
    'docker / kubernetes',
    'asynchronous communication for messaging - like zeromq, rabbitmq',
    'hacking -- .onion friend, sorry!'
); # and that is far from all

our $want = 'your thought';

if ($want eq 'call')
 {  call_number ('+420 603 794 064');  }
elsif ($want eq 'mail')
 {  mail_to ('marek.schor@gmail.com') || mail_to ('marek.schor@webline.cz');  }
elsif ($want eq "social_network")
 {  click_on ('facebook.com/marekschor') || click_on ('twitter.com/marexor') || click_on ('linkedin.com/in/marek-schor');  }
else
 {  die;  } # Nothing against you. This is Perl!

[marek.schor@webline.cz ~]#

my current project
msdb.info