source: subversion/applications/utils/gary68/diffDB.pl @ 24920

Revision 24920, 720 bytes checked in by gary68, 3 years ago (diff)

new osmDB.pm plus helper prgs

  • Property svn:executable set to *
Line 
1
2use strict ;
3use warnings ;
4
5use OSM::osm ;
6use OSM::osmDB ;
7use File::stat;
8use Time::localtime;
9
10
11my $program = "diffDB.pl" ;
12my $version = "0.1 BETA" ;
13
14my $usage = $program . " dbname file.osc" ;
15
16
17
18my $time0 = time() ; my $time1 ;
19
20my $oscName ;
21my $dbName ;
22
23
24
25
26###############
27# get parameter
28###############
29
30$dbName = shift||'';
31if (!$dbName)
32{
33        die (print $usage, "\n");
34}
35
36$oscName = shift||'';
37if (!$oscName)
38{
39        die (print $usage, "\n");
40}
41
42print "\n$program $version for DB $dbName file $oscName\n\n" ;
43print "\n\n" ;
44
45
46
47applyDiffFile ($dbName, $oscName) ;
48
49
50$time1 = time () ;
51
52print "\nINFO: finished after ", stringTimeSpent ($time1-$time0), "\n\n" ; 
Note: See TracBrowser for help on using the repository browser.