Difference between revisions of "Import CSV data into a wiki"

From Organic Design wiki
m
m (Installation)
 
(42 intermediate revisions by 5 users not shown)
Line 1: Line 1:
#!/usr/bin/perl
+
{{procedure}}
#{{perl}}{{#security:*|sysop}}
 
# - Licenced under LGPL (http://www.gnu.org/copyleft/lesser.html)
 
# - Author: http://www.organicdesign.co.nz/nad
 
# - Source: http://www.organicdesign.co.nz/scraper.pl
 
# - Started: 2008-03-21
 
  
require('wiki.pl');
+
[{{repo|tools|csv2wiki.pl}} csv2wiki.pl] is a simple perl script to import data from a CSV file into a MediaWiki.
  
# Job, log and error files
+
== Installation ==
$ARGV[0] or die "No job file specified!";
+
The script depends on a Perl module called [{{repo|tools|MediaWiki.pm}} MediaWiki.pm] which needs to be saved in the same location, or in one of your Perl include paths.
$ARGV[0] =~ /^(.+?)(\..+?)?$/;
 
$::log = "$1.log";
 
$::err = "$1.err";
 
$::sep = ',';
 
$::title = 0;
 
$::template = 'Record';
 
  
# Parse the job file
+
It also depends on ''LWP'' and ''XML::Simple''. If these dependencies are not present, Perl will raise an error specifying which one is not available and you can then install it with CPAN, e.g.
if (open JOB,'<',$ARGV[0]) {
+
<source lang="bash">
for (<JOB>) {
+
cpan XML::Simple
if (/^\*?\s*csv\s*:\s*(.+?)\s*$/i)      { $::csv = $1 }
+
</source>
if (/^\*?\s*wiki\s*:\s*(.+?)\s*$/i)      { $::wiki = $1 }
 
if (/^\*?\s*user\s*:\s*(.+?)\s*$/i)      { $::user = $1 }
 
if (/^\*?\s*pass\s*:\s*(.+?)\s*$/i)      { $::pass = $1 }
 
if (/^\*?\s*separator\s*:\s*(.+?)\s*$/i) { $::sep = $1 }
 
if (/^\*?\s*title\s*:\s*(.+?)\s*$/i)    { $::title = $1 }
 
if (/^\*?\s*template\s*:\s*(.+?)\s*$/i)  { $::template = $1 }
 
}
 
close JOB;
 
} else { die "Couldn't parse job file!" }
 
  
 +
On Debian-like systems there are also packages for the dependencies:
 +
<source lang="bash">
 +
apt install libwww-perl libxml-simple-perl
 +
</source>
  
# Open CSV file and read in headings line
+
== Usage ==
if (open CSV,'<',$::csv) {
+
The program is run from the shell and requires one parameter which is the filename of a configuration file describing the parameters for the job.
$_ = <CSV>;
+
<source lang="bash">
/^\s*(.+?)\s*$/;
+
./csv2wiki.pl /home/myJob.conf
@headings = split /$::sep/i, $1;
+
</source>
} else { die "Could not open CSV file!" }
 
  
# Log in to the wiki
 
wikiLogin($::wiki,$::user,$::pass) or exit;
 
  
# Get batch size and current number (also later account for n-bots)
+
Here is an example the content of a configuration file:
 +
<source lang="js">
 +
wiki    = "http://foo.bar/wiki/index.php"
 +
user    = "Foo"
 +
pass    = "Bar"
 +
csv      = "/home/foo/projects/bar.csv"
 +
title    = "$1 $2 $3"
 +
template = "Customer"
 +
</source>
  
# todo: log batch start
 
  
# Process the records
+
Each line of the input CSV file will be imported into an article in the wiki, and the first line of the input file specifies the column header names, for example:
$n = 1;
+
<source>
while (<CSV>) {
+
Title, Firstname, Surname
/^\s*(.+?)\s*$/;
+
Mr, Bob, McFoo
@record = split /$::sep/, $1;
+
Miss, Mary, Barson
$tmpl  = "{{$template\n";
+
</source>
$tmpl  .= "|$headings[$_] = $record[$_]\n" for 0..$#headings;
 
$tmpl  .= "}}";
 
print "Processing record ".$n++."\n";
 
  
# Update the record
 
$text  = wikiRawPage($::wiki,$record[$::title],0);
 
$text .= "\n$tmpl" unless $text =~ s/\{\{$template.+?\}\}/$tmpl/is;
 
$done  = wikiPageEdit($::wiki,$record[$::title],$text,"$template updated by csv2wiki.pl");
 
  
# log a row error if any
+
In this example the first row of data will be imported into an article called "Mr Bob McFoo" with the following content. The column header names are used as the template parameter names, with the values from that row of the CSV file being used as the values for the template parameters.
}
+
<source>
 +
{{Customer
 +
| Title = Mr
 +
| Firstname = Bob
 +
| Surname = McFoo
 +
}}
 +
</source>
  
close CSV;
+
 
 +
If the page already existed, then the new template would be inserted at the top of the page (or the bottom if "append" is set). Or if the template already exists in the page, then it's values will be updated.
 +
 
 +
'''Note''' that pages that already have templates on them must only use a single value on each line in their syntax.
 +
 
 +
== Configuration options ==
 +
Here is a description of the possible parameters in the job file and their meaning:
 +
{| class=od-info
 +
!Name!!Meaning!!Default value
 +
|-
 +
|csv||The source file to import relative to the location of the script||-
 +
|-
 +
|wiki||the full long-form URL of the wiki including index.php||-
 +
|-
 +
|user||Username of a user on the wiki with permission to create the necessary articles||-
 +
|-
 +
|pass||The users password||-
 +
|-
 +
|separator||Also just "sep" is allowed, specifies the separator character used in the CSV file||''comma''
 +
|-
 +
|title||The format of the title using '''$n''' to specify the column numbers, default is ''$1'' which means to use just the first column as the page title||$1
 +
|-
 +
|template||The template that the parameters should be wrapped by in the created wiki articles||Record
 +
|-
 +
|append||Set this to 1 to place the template at the end of the text if the template doesn't already exist in the article||0
 +
|-
 +
|include||A comma-separated list of the columns that should be included from the CSV, by default all columns are used||''not set''
 +
|-
 +
|}
 +
[[Category:Tools]][[Category:PERL]]

Latest revision as of 20:52, 7 May 2020

Procedure.svg Import CSV data into a wiki
Organic Design procedure

csv2wiki.pl is a simple perl script to import data from a CSV file into a MediaWiki.

Installation

The script depends on a Perl module called MediaWiki.pm which needs to be saved in the same location, or in one of your Perl include paths.

It also depends on LWP and XML::Simple. If these dependencies are not present, Perl will raise an error specifying which one is not available and you can then install it with CPAN, e.g.

cpan XML::Simple

On Debian-like systems there are also packages for the dependencies:

apt install libwww-perl libxml-simple-perl

Usage

The program is run from the shell and requires one parameter which is the filename of a configuration file describing the parameters for the job.

./csv2wiki.pl /home/myJob.conf


Here is an example the content of a configuration file:

wiki     = "http://foo.bar/wiki/index.php"
user     = "Foo"
pass     = "Bar"
csv      = "/home/foo/projects/bar.csv"
title    = "$1 $2 $3"
template = "Customer"


Each line of the input CSV file will be imported into an article in the wiki, and the first line of the input file specifies the column header names, for example:

Title, Firstname, Surname
Mr, Bob, McFoo
Miss, Mary, Barson


In this example the first row of data will be imported into an article called "Mr Bob McFoo" with the following content. The column header names are used as the template parameter names, with the values from that row of the CSV file being used as the values for the template parameters.

{{Customer
 | Title = Mr
 | Firstname = Bob
 | Surname = McFoo
}}


If the page already existed, then the new template would be inserted at the top of the page (or the bottom if "append" is set). Or if the template already exists in the page, then it's values will be updated.

Note that pages that already have templates on them must only use a single value on each line in their syntax.

Configuration options

Here is a description of the possible parameters in the job file and their meaning:

Name Meaning Default value
csv The source file to import relative to the location of the script -
wiki the full long-form URL of the wiki including index.php -
user Username of a user on the wiki with permission to create the necessary articles -
pass The users password -
separator Also just "sep" is allowed, specifies the separator character used in the CSV file comma
title The format of the title using $n to specify the column numbers, default is $1 which means to use just the first column as the page title $1
template The template that the parameters should be wrapped by in the created wiki articles Record
append Set this to 1 to place the template at the end of the text if the template doesn't already exist in the article 0
include A comma-separated list of the columns that should be included from the CSV, by default all columns are used not set