Linux::Inotify2 ã§ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªã‚’監視ã—ã¦ãªã‚“ã‹ã™ã‚‹ - black-mountain-sideã®æ—¥è¨˜ã‚るディレクトリã«ãƒ•ã‚¡ã‚¤ãƒ«ãŒç½®ã‹ã‚ŒãŸã‚‰ä½•ã‹ã—ãŸã„〠ã¿ãŸã„ã«ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªã‚’監視ã—ã¦å‡¦ç†ã‚’è¡Œã„ãŸã„å ´åˆã€Linux::Inotify2 ãŒä¾¿åˆ©ã§ã™ã。 ã‚‚ã¡ã‚ã‚“ã€inotify ãŒåˆ©ç”¨ã§ãる環境ã§ã—ã‹ä½¿ãˆã¾ã›ã‚“ãŒã€‚ 下ã¯ã€ãƒ›ãƒ¼ãƒ ディレクトリã®â€backupâ€ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªã«ãƒ•ã‚¡ã‚¤ãƒ«ã‚’ç½®ãã¨"backup_server"ã«ãã®ãƒ•ã‚¡ã‚¤ãƒ«ã‚’scpã—ã¾ã™ã€‚ watch_and_scp.pl #!/usr/bin/perl use strict; use warnings; use Linux::Inotify2; my $watch_dir = $ENV{HOME} . '/backup'; my $inotify = Linux::Inotify2->new or die $!; $inotify->watch( $watch_dir, IN_CLOSE_WRITE | IN_MOVED_TO, s
『inotifyを使ã£ã¦ãƒ•ã‚¡ã‚¤ãƒ«ã‚„ディレクトリã«èµ·ããŸã‚¤ãƒ™ãƒ³ãƒˆã‚’ç°¡å˜ã«ç›£è¦–ã™ã‚‹ã€
inotify ã¯ã©ã†ã‚„ã£ã¦ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªç›£è¦–を実ç¾ã—ã¦ã„ã‚‹ã®ã‹ã€‚実装ã®åˆ¶é™ã€ã¨ã„ã†ã‹ç½ ã«ã¤ã„ã¦
ã„ã¾ã™ã実践! Linuxシステム管ç†
{{#tags}}- {{label}}
{{/tags}}