#!c:\perl\perl.exe
#!/usr/local/bin/perl
use strict;

##</code><code>##

use strict;
use Config;
my $datafile = "";
if ( $Config{"perlpath"} =~ m/^c:/i ) {
   $datafile = 'c:\work\perl\data';
} else {
   $datafile = '/usr/svsingh/data';
}