$ groupadd zabbix
$ useradd -g zabbix -s /sbin/nologin zabbix
$ mkdir -p /etc/zabbix/logs
$ cd /usr/local/src/ ; pwd
mysql> CREATE DATABASE hogehogee;
mysql> CREATE TABLE user (username varchar(10), address varchar(10));
mysql> DESCRIBE user;
+----------+-------------+------+-----+---------+-------+
| Field | Type | Null | Key | Default | Extra |
+----------+-------------+------+-----+---------+-------+
<domain type='kvm'> | |
<name>[% NAME %]</name> | |
<uuid>[% UUID %]</uuid> | |
<memory>[% MEM %]</memory> | |
<currentMemory>[% MEM %]</currentMemory> | |
<vcpu>[% CPU %]</vcpu> | |
<os> | |
<type arch='x86_64' machine='rhel5.4.0'>hvm</type> | |
<boot dev='hd'/> | |
</os> |
#!/usr/bin/env perl | |
package Iops; | |
sub new{ | |
my $pkg = shift; | |
bless{ | |
data => shift, | |
sum => 0, | |
count => 0, |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use DBI; | |
use Data::Dumper; | |
my $file = "./ip_mac.txt"; |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use v5.14; | |
my @hoge = qw( one two three two one two three ); | |
#!/usr/bin/env perl | |
use warnings; | |
use v5.10; | |
use Data::Dumper; | |
my @alfabet = ('A' .. 'Z'); |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
package Foo; | |
sub hoge{ return "hello" } | |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
package Foo; | |
sub hoge{ return "hello" } | |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use LWP::UserAgent; | |
use HTML::TreeBuilder; | |
my $url = "http://www.jsports.co.jp/search/sys/kensaku.cgi?Genre2=02"; | |
my $user_agent = "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0)"; |