Logo of British Petroil

Never in my life I saw a logo more suitable for an Oil Company : a stylized flower.

Nothing more suited to those who are polluting and destroying nature (see. Gulf of Mexico disaster).

Stay Connected.

Script PERL : Totals File in a Directory

This is a simple script to show total number of Files in a directory.

Script accepts in input one argument : Directory.

$totfile = 0;

opendir(my $dh, $ARGV[0]) || die;

while(readdir $dh) {

print "$some_dir/$_\n";

$totfile++;

}

closedir $dh;

printf(" Tot Files : $totfile \n");

Stay Connected.

Italy :14.4 mln at risk of poverty

Based on a study on Global Rights 2010 of 'Associazione Società Informazione' :

In Italy 13,6 mln of workers gain under of 1300 euro per month and between these, 6,9 mln (60% women) gain under 1000 euro per month. More than 7,5 mln of pensioners gain under 1000 euro.

In 2009, 10% of occupies in under relative poverty level (Worse % in Europe with an average of 8%).

In six years, is underlined in the study, between 2002 and 2008, net family income has lost 1,599 euros each year among workers and 1,681 between employees.

Take your consideration of these data.

Stay Connected.

Evolution of the Italian race

Something wrong happened.

Stay Connected.

Stat command in Perl (Unix/Linux)

This perl script execute a stat of a file in UNIX/LINUX environment and accept in input file name with absolute path. It shows various file info and atime, mtime and ctime.

#!/usr/bin/perl -w

#

# stat.pl

#

($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size,

$atime, $mtime, $ctime, $blksize, $blocks) = stat($ARGV[0]);

print("dev = $dev\n");

print("ino = $ino\n");

print("mode = $mode\n");

print("nlink = $nlink\n");

print("uid = $uid\n");

print("gid = $gid\n");

print("rdev = $rdev\n");

print("size = $size\n");

print("atime = $atime\n");

print("mtime = $mtime\n");

print("ctime = $ctime\n");

print("blksize = $blksize\n");

print("blocks = $blocks\n");

($sec, $min, $hr, $day, $month, $year, $day_Of_Week, $julianDate, $dst) = localtime($ctime);

$year = $year + 1900;

$month = $month + 1;

printf(" ctime $year/$month/$day $hr:$min:$sec\n");

($sec, $min, $hr, $day, $month, $year, $day_Of_Week, $julianDate, $dst) = localtime($mtime);

$year = $year + 1900;

$month = $month + 1;

printf(" mtime $year/$month/$day $hr:$min:$sec\n");

($sec, $min, $hr, $day, $month, $year, $day_Of_Week, $julianDate, $dst) = localtime($atime);

$year = $year + 1900;

$month = $month + 1;

printf(" atime $year/$month/$day $hr:$min:$sec\n");

Stay connected.

CUBE and ROLLUP options in GROUP BY

For my actual project i am studying CUBE and ROLLUP option in GROUP BY.

These options are present from Oracle 8i and are very interesting :

ROLLUP

Rollup enables a SELECT statement to calculate multiple levels of subtotals across a specified group of dimension. Really is an extension of GROUP BY clause.

In this example are summarized totals and sales for Departments and Job Title with each totals for Department.

CUBE

Cube enables a SELECT statement to calculate subtotals for all possible combinations of a group of dimension.

In this example are summarized totals and sales for Departments and Job Title with each totals for Department and also for each job title.

Stay connected.

What wants Telefonica really ?

This interesting article "Scenarios - Telefonica's options in Brazil" speaks about an offer refused by Portugal Telecom to buy out its stake in Vivo.

Actually Telefonica controls Telecom Italia by Telco, an italian company formed also by italian banks and assurances.

Due to this participation, Telecom Italia will sell his participation in Telecom Argentina for antitrust problem while Brazilian antitrust (In Brazil, Telefonica participates Vivo with Portugal Telecom and Tim Brazil with Telecom Italia) approve it.

Now, why Telefonica want acquire total control of Vivo ? Sure it knows that if it happens, sure Brazilian antitrust encountered a monopolistic situation in mobile market and Telecom Italia will be in trouble. So what game is playing Telefonica?

The article made the following assumptions for Telefonica:

1 - RAISE ITS BID FOR THE VIVO STAKE
2 - OFFER ANOTHER ASSET IN EXCHANGE FOR VIVO STAKE
3 - BUY PORTUGAL TELECOM OUTRIGHT
4 - PURSUE TIM BRASIL

After an analysis for me behind interest in VIVO really there is interest in eliminate TIM BRASIL from Brazilian Telecom Market or directly acquire total control of Telecom Italia.

The battle has just begun.

Stay Connected.