kenjiskywalker

アカウント作成

$ groupadd zabbix
$ useradd -g zabbix -s /sbin/nologin zabbix
$ mkdir -p /etc/zabbix/logs

インストール

$ cd /usr/local/src/ ; pwd

kenjiskywalker

データベース追加

mysql> CREATE DATABASE hogehogee;

デーブル追加

mysql> CREATE TABLE user (username varchar(10), address varchar(10));
mysql> DESCRIBE user;
+----------+-------------+------+-----+---------+-------+
| Field | Type | Null | Key | Default | Extra |
+----------+-------------+------+-----+---------+-------+

kenjiskywalker

<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>

kenjiskywalker

#!/usr/bin/env perl

package Iops;

sub new{
    my $pkg = shift;
    bless{ 
	  data => shift,
	  sum  => 0,
	  count => 0,

kenjiskywalker

#!/usr/bin/env perl

use strict;
use warnings;

use DBI;
use Data::Dumper;

my $file = "./ip_mac.txt";

kenjiskywalker

#!/usr/bin/env perl

use strict;
use warnings;

use v5.14;

my @hoge = qw( one two three two one two three );

kenjiskywalker

#!/usr/bin/env perl

use warnings;
use v5.10;

use Data::Dumper;

my @alfabet = ('A' .. 'Z');

kenjiskywalker

#!/usr/bin/env perl

use strict;
use warnings;

package Foo;

sub hoge{ return "hello" }

kenjiskywalker

#!/usr/bin/env perl

use strict;
use warnings;

package Foo;

sub hoge{ return "hello" }

kenjiskywalker

#!/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)";