Too late for -CSD

Trying to run this little perl program from parsCit:

parsCit-client.pl e1.txt Too late for the -CSD option on the [filename] line 1

e1.txt is here: http://dl.dropbox.com/u/10557283/parserProj/e1.txt

I run the program from win7 cmd, not Cygwin.

filename - parsCit-client.pl - the whole program is here:

#!/usr/bin/perl -CSD
#
# Simple SOAP client for the ParsCit web service.
#
# Isaac Councill, 07/24/07
#
use strict;
use encoding 'utf8';
use utf8;
use SOAP::Lite +trace=>'debug';
use MIME::Base64;
use FindBin;

my $textFile = $ARGV[0];
my $repositoryID = $ARGV[1];

if (!defined $textFile || !defined $repositoryID) {
    print "Usage: $0 textFile repositoryID\n".
    "Specify \"LOCAL\" as repository if using local file system.\n";
    exit;
}

my $wsdl = "$FindBin::Bin/../wsdl/ParsCit.wsdl";

my $parsCitService = SOAP::Lite
    ->service("file:$wsdl")
    ->on_fault(
           sub {
           my($soap, $res) = @_;
           die ref $res ? $res->faultstring :
               $soap->transport->status;
           });

my ($citations, $citeFile, $bodyFile) =
    $parsCitService->extractCitations($textFile, $repositoryID);

#print "$citations\n";
#print "CITEFILE: $citeFile\n";
#print "BODYFILE: $bodyFile\n";
+5
source share
2 answers

From perldoc perlrun , about the switch -C:

. perl 5.10.1, -C "#!" line, it , perl . binmode() - .

, -, , " ".

:

perl -CSD parsCit-client.pl 
+8

#! "shebang" (. ), Perl shebang script , 34087 -C shebang. , "", , , UTF-8.

, binmode() ( ), utf8::all, perl -CSDL.

* nix, export PERL_UNICODE="SDA" script, Perl UTF-8.

+2

All Articles