Corporate Greenings
<%perl>
my $datasource = "dbi:mysql:peakinsight";
my $dbusername = "peakinsight";
my $dbpassword = "aayrsh3687";
my $dbh = DBI->connect($datasource, $dbusername, $dbpassword);
my $statement = "SELECT file,title FROM insights WHERE itemtype = 'corporategreening'";
my $sth = $dbh->prepare($statement);
my $rv = $sth->execute;
while (my @row = $sth->fetchrow_array) {
unless ($row[0] =~ /^http/) {
print qq~$row[1]
Click here to download
\n~;
} else {
print qq~$row[1]
Click here to visit
\n~;
}
}
Back to Top
White Papers
<%perl>
$statement = "SELECT file,title FROM insights WHERE itemtype = 'whitepaper'";
$sth = $dbh->prepare($statement);
$rv = $sth->execute;
while (my @row = $sth->fetchrow_array) {
unless ($row[0] =~ /^http/) {
print qq~$row[1]
Click here to download
\n~;
} else {
print qq~$row[1]
Click here to visit
\n~;
}
}
Back to Top
E-Articles
<%perl>
$statement = "SELECT file,title FROM insights WHERE itemtype = 'earticle'";
$sth = $dbh->prepare($statement);
$rv = $sth->execute;
while (my @row = $sth->fetchrow_array) {
unless ($row[0] =~ /^http/) {
#print qq~$row[1]
$row[0]
\n~;
print qq~Fielding high impact players - The evolution of CXO talent management
http://www.linezine.com/4.2/articles/khfhip.htm
Reflections on cancers, forest fires and other catalysts
http://www.linkageinc.com/newsletter/archives/od/
katherine_holt_reflections_2.shtml
Reflections on the flotsam and jetsam of change
http://www.linkageinc.com/newsletter/archives/od/
katherine_holt_reflections_3.shtml
Reflections on storytelling and listening
http://www.linkageinc.com/newsletter/archives/od/
katherine_holt_reflections_4.shtml\n~;
} else {
print qq~$row[1]
Click here to visit
\n~;
}
}
Back to Top
Presentations
<%perl>
$statement = "SELECT file,title FROM insights WHERE itemtype = 'presentation'";
$sth = $dbh->prepare($statement);
$rv = $sth->execute;
while (my @row = $sth->fetchrow_array) {
unless ($row[0] =~ /^http/) {
print qq~$row[1]
Click here to download
\n~;
} else {
print qq~$row[1]
Click here to visit
\n~;
}
}
Back to Top