Korn Shell Loops

Je ne sais pas la raison que c’est trés difficille pour me mementer.  Mais je crois qu’il est parçe que avec AIX et Korn, vous devez utilisier (( arithmetic )).

Voilá:

#!/bin/sh
/bin/queqecommande
i=10
while (($i>=0))
do
/bin/autrecommande
(( i = i – 1 ))
done

Netbackup List of RL 24 Tapes

#!/usr/bin/perl -w
#       This will output the fololwing data:
#       Server,schedule,Backup Time,Image Name,Expiration Date,fragment number,Media barcode...
#       Use bpimagelist output piped to this file.  ie:
# /usr/openv/netbackup/bin/admincmd/bpimagelist -client foo -rl 24 -d 01/01/2000 00:00:00|./quarterly.data.pl

use strict;
use DateTime::Format::Epoch;
use Switch;

my @input=<STDIN>;
my $barcode;
my $prevbarcode;
my $line="";
my @values;
my $fragmentnumber="";
my $client;
my $backuptime;
my $imagename;
my $expirationdate;
my $scheduletype;
my $dt = DateTime->new( year => 1970, month => 1, day => 1 );
my $formatter = DateTime::Format::Epoch->new(
 epoch          => $dt,
 unit           => 'seconds',
 type           => 'int',    # or 'float', 'bigint'
 skip_leap_seconds => 1,
 start_at       => 0,
 local_epoch    => undef,
 );
foreach (@input) {
 $line=$_;
 @values=split(" ",$line);
 if ($line=~ m/IMAGE/) {
 $client=$values[1];
 $backuptime=$formatter->parse_datetime( $values[13] );
 $imagename=$values[5];
 switch ($values[11]) {
 case 0  { $scheduletype="Full"; }
 case 1  { $scheduletype="Incremental"; }
 case 2  { $scheduletype="Database"; }
 case 3  { $scheduletype="User Archive"; }
 case 4  { $scheduletype="Cumulative Incremental";}
 else    { $scheduletype=$values[11]; }
 }
 }
 if ($line=~m/FRAG/) {
 $fragmentnumber=$values[2];
 $barcode=`/usr/openv/volmgr/bin/vmquery -m $values[8]|awk '/barcode/ {print \$2;}'`;
 chomp($barcode);
 if ( $fragmentnumber == 1 ) {
 $expirationdate=$formatter->parse_datetime($values[16]);
 print "\n$client,$scheduletype,$backuptime,$imagename,$expirationdate,$fragmentnumber,$barcode";
 }
 else {
 if ( $prevbarcode ne $barcode ) { print ",$barcode"; }
 }
 $prevbarcode=$barcode;
 }
}

Eicar essayer

http://www.aleph-tec.com/eicar/index.php

Trés bien.  Une moyen essayer ton anti-virus avec eicar.

Virtual Floppy Drive

Voilá.  P/c c’est trop difficille chercher.

<a href=”http://webscripts.softpedia.com/script/Development-Scripts-js/Complete-applications/Virtual-Floppy-Drive-39797.html”><img border=”0″ src=”http://www.softpedia.com/images/softpedia_download_small.gif”/></a>

C’est virtual floppy drive pour windows.  Le nom de la fichier est

vft21-050404.rar

X11 Display

# xclock
Error: Can’t open display:

Vous doyez xauth rpm.

Mettre à jour RT de 3.4.6 à 3.8.2

N’est past trop difficile, mais c’est difficile.

Deplacer Linux Volume Group

C’est vraiment simple:

1. Desactiver avec vgchange -a n.

2. vgexport le volume

3. Sur le nouveau ordinateur, apres deplacer le disque: vgimport

4. Finalment, vgchange -a n pour l’utilisier.

Screen: Cannot find terminfo entry for ‘vt100′

Si vous ca voyez, puis en AIX:

export TERMINFO=/usr/share/lib/terminfo

AIX 0516-304 & 0516-896 avec “ghost hdisks”

J’ai vu des erreurs en haut au jourd’hui.  Si vous savez la raison qu’il est une hdisk oublir de votre serveur, vous pouvez supprimez le hdisk data comme ca:

Perl script netbackup

Voir les archives!