/l3/users/Alexcr/asterisk/localhost/root :1
[ править ]

Журнал лабораторных работ

Содержание

Журнал

Понедельник (06/14/10)

/dev/pts/13
22:15:22
#l3-cgi-lite [----] 0 L:[ 1+ 0 1/247] *(0 /6822b) 0035 0x023 
#!/usr/bin/perl
use strict;
use CGI qw(:standard);
use utf8;                        86 35 121        3819         032 0x020
# В каталоге есть файл $data_file
# Если существуют html и xml файлы,
# Отлично! Сейчас будем показывать журнал
# html файл новее чем xml,
# иunless ( -e "$real_path/$data_file"
             && -e "$real_path/index.html".
...
 1Help           2Save           3Mark           4Replac         5Copy           6Move           7Search         8Delete        9PullDn       10Quit
  Left     File     Command     Options     Right
        close(HTML);
    }
}
}
# В этом каталоге нет файла data.xml
# Но в нём должны быть подкаталоги!
Hint: To use the mouse cut and paste may require holding the shift key
else {
/dev/pts/9
22:15:22
#httpd.conf [----] 23 L:[971+27 998/1006] *(33764/34221b) 0114 0x072 
#
# Use name-based virtual hosting.
#
#NameVirtualHost *:80
#
# NOTE: NameVirtualHost cannot be used without a port specifier.
# (e.g. :80) if mod_ssl is being used, due to the nature of the
# SSL protocol.
#
#
...
#    CustomLog logs/dummy-host.example.com-access_log common
#</VirtualHost>
    ScriptAlias /l3 /usr/lib/cgi-bin/l3-cgi-lite
        ScriptAlias /l3-upload /usr/lib/cgi-bin/l3-upload
            <Directory /usr/lib/cgi-bin/>
                    AllowOverride None
                            Options ExecCGI -MultiViews FollowSymlinks
                                    Order allow,deny
                                            Allow from all
                                                </Directory>
22:15:22
#l3-cgi-lite [----] 0 L:[ 1+ 0 1/247] *(0 /6822b) 0035 0x023
#!/usr/bin/perl                  36 13  49        1122         032 0x020
$page_id=$this_page_number;
use strict;
my $real_path = $l3config::Config{"backend_datadir"} ;
      {
my $cgi_path = $l3config::Config{"cgi_path"} ;
my $l3config::Config{"command_id"}=$1;
   $page_id=$1;
m
if ($filter =~ /page=([^&]*)/ ) {
...
    }
}
}
# В этом каталоге нет файла data.xml
# Но в нём должны быть подкаталоги!
Hint: To use the mouse cut and paste may require holding the shift key
else {
    or error ("Путь $path содержит недопустимые символы или комбинации символов.");
}
my $data_file = "data.xml"
/dev/pts/13
22:15:54
#l3-upload [----] 0 L:[ 1+ 0 1/ 37] *(0 / 600b) 0035 0x023 
  Left     File     Command     Options     Right
#
BEGIN {
    chdir("/etc/lilalo/");
    require l3config;
    l3config::init_config();
};
use CGI;
$upload_dir = "/var/www/xguru/l3shot";
$query = new CGI;
...
while ( <$upload_filehandle> )
{
    print UPLOADFILE;
}
close UPLOADFILE;
print $query->header ( );
print <<END_HTML;
Upload complete
END_HTML
 1Help           2Save           3Mark           4Replac         5Copy           6Move           7Search         8Delete        9PullDn       10Quit
22:15:54
#881#0#0#20617#1276546554#/usr/lib/cgi-bin#24887#[root@alexcr:cgi-bin]# [6~ 
  Left     File     Command     Options     Right
│'n                        Name                         │ Size  │Modify time ││'n                        Name                          │ Size  │Modify time │€â”€â”€.[^]>┐┌<─ /usr/lib/cgi-bin ────────────────────────────────────────────────────.[^]>┐
│/..                                                    │UP--DIR│Jun 14 21:30││/..                                                     │UP--DIR│Jun 14 21:28│
│ httpd.conf                                            │  34221│Jun 14 21:30││*l3-cgi-lite                                            │   6822│Jun 14 21:28│
│ magic                                                 │  12958│Apr  4 21:16││*l3-upload                                              │    600│Jun 14 21:28│
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
...
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
│                                                       │       │            ││                                                        │       │            │
├────────────────────────────────────────────────────────────────────────────┤├──────────────────────────────────────────────────────â
│ httpd.conf                                                                 ││UP--DIR                                                                      │
└────────────────────────────────────────────────────────── 9042M/44G (20%) ─┘└─────────────────────────────────────────────────────────── 9042M/44G (20%) ─
Hint: Find File: you can work on the files found using the Panelize button.
22:15:54
#l3config.pm [----] 0 L:[ 1+ 0 1/184] *(0 /5830b) 0112 0x070 
package l3config;
use utf8;
use Exporter;
use vars qw(@ISA @EXPORT $VERSION);
use Getopt::Long;
@ISA = ('Exporter');
@EXPORT = qw(%Config &init_config);
our $System_Config_File = "/etc/lilalo.conf";
our $User_Config_File = "$ENV{HOME}/.l3rc";
$ENV{HOME} ||= "/tmp";
...
{   "class_suffix"      => ".xml",      # Cуффикс файла класса
    "classfile"         => "",.run",.
<------>my %argv_config;
<------>my %file_config;
    "sshkey"            => "$ENV{HOME}/.ssh/id_dsa.pub",
<------>read_config_file(\%file_config, $System_Config_File);
    "lmssh"             => "./lm-ssh",      # Имя файла класса
<------>read_config_file(\%file_config, $User_Config_File);
    "lminstall"         => "./lm-install",
Hint: The homepage of GNU Midnight Commander: http://www.midnight-commander.org/
/dev/pts/9
22:15:54
#l3-upload [----] 0 L:[ 1+ 0 1/ 37] *(0 / 600b) 0035 0x023 
  Left     File     Command     Options     Right
#
BEGIN {
    chdir("/etc/lilalo/");
    require l3config;
    l3config::init_config();
};
use CGI;
$upload_dir = "/var/www/xguru/l3shot";
$query = new CGI;
...
while ( <$upload_filehandle> )
{
    print UPLOADFILE;
}
close UPLOADFILE;
print $query->header ( );
print <<END_HTML;
Upload complete
END_HTML
 1Help           2Save           3Mark           4Replac         5Copy           6Move           7Search         8Delete        9PullDn       10Quit
22:15:54
#881#0#0#20617#1276546554#/usr/lib/cgi-bin#24887#[root@alexcr:cgi-bin]# [6~ 
  Left     File     Command     Options     Right
│'n                        Name                         │ Size  │Modify time ││'n                        Name                          │ Size  │Modify time │€â”€â”€.[^]>┐┌<─ /usr/lib/cgi-bin ────────────────────────────────────────────────────.[^]>┐
│/..                                                    │UP--DIR│Jun 14 21:30││/..                                                     │UP--DIR│Jun 14 21:28│
│ httpd.conf                                            │  34221