Perl i SSH w jednaj stajni stały

Perl

O ile moja przygoda z sieciowym programowaniem nie jest nowa, o tyle wpis ten rozpocznie cykl artykułów poświęconych sieciowemu programowaniu czyli jak usprawniać pewne procesy, które są żmudne i nudne. Po to ludzkość wymyśliła komputery, aby takie czynności powierzać maszynom! Podstawy łączenia po protokole SSH z poziomu perla czas zacząć…!

Najpierw przygotowanie środowiska. Platforma bazowa to Linux Debian 8.3.0-amd64

version

Przed instalacją modułów perla trzeba doinstalować potrzebne paczki, bez których nic nie zdziałamy

„apt-get install make gcc gcc-4.8 libssh-4 libssh-gcrypt-4 libssh-dev libssh2-1-dev”

perl_ssh_apt_installation

Po instalacji paczek instalujemy potrzebne moduły perla

„cpan App::cpanminus”

perl_ssh_apt_cpanminus

Od tej pory instalacja modułów perla poprzez cpanm

„cpanm Net::SSH2”

perl_ssh_apt_net_ssh

„cpanm Control::CLI”

Control-CLI

Control::CLI to moduł, który jest bardzo fajnie udokumentowany z wieloma przykładami

-> http://search.cpan.org/~lstevens/Control-CLI/lib/Control/CLI.pm

Następnie tworzymy katalog w którym umieścimy skrypt oraz logi

perl_ssh_apt_dir_mkdir

Zanim zaczniemy pisać skrypt musimy jeszcze wygenerować klucze rsa – publiczny i prywatny

perl_ssh_rsa_generating

Poniżej listening samego skryptu – jest to baza, którą z czasem będę dalej uzupełniał o kolejne funkcjonalności. Zmienne jak i kod samego skryptu są trywialne i wydaje mi się, że każdy powinien sobie poradzić z ich edycją pod własne potrzeby. W razie czego piszcie w komentarzach, to zamieszczę szczegółowy opis.

perl_ssh_listening_ok

Plik ze skryptem, można pobierać i edytować do swoich potrzeb

ssh_connect_app

Przed uruchomieniem trzeba jeszcze dodać atrybut wykonywalności dla skryptu

perl_ssh_executable_flags

Test wykonania

perl_ssh_uruchomienie

Logi z połączenia

perl_ssh_logs_ok

 

1 Komentarz

  1. MartinAMISY MartinAMISY
    19 marca 2019    

    Hej, to moj pierwszy post na forum – witam wszystkich forumowiczow. Martin :)

Dodaj komentarz