Använder Aspose.Cells for Java med Perl
Contents
[
Hide
]
Aspose.Cells for Java är en ren Java komponent som kan användas med Perl. Att använda komponenten är detsamma som att anropa andra vanliga Java API:er i Perl. För att ringa ett Java-bibliotek i Perl måste du först installera tillägget Java-Perl för Perl. Detta behövs för att komma åt JVM.
Nödvändig programvara och bibliotek
Följande programvara och bibliotek krävs.
- Perl.
- Aspose.Cells for Java.
- Java - Perl förlängning.
- Java körtid som uppfyller kravet på Aspose.Cells for Java och Java-Perl förlängning.
Guide
För att ringa ett Java API i Perl måste du först installera tillägget Java-Perl för Perl. (För den här artikeln antar vi att Perl har installerats och ställts in på rätt sätt.) Du kan få tillägget Java-Perl frånMetzzo/Java-4.7/
I slutet av det här dokumentet finns ett exempel på Perl-skript som anropar Aspose.Cells for Java. Följ följande steg för att köra det:
- Ladda ner filen Java-4.7.tar.gz och packa upp den till din lokala enhet.
- Installera det här paketet för Perl.
- Starta JavaServer. Kommandot blir:
java -classpath ... com.zzo.javaserver.JavaServer
där … är klasssökvägen som måste inkludera alla bibliotek som krävs av din ansökan.
För att använda Aspose.Cells for Java, bör innehålla minst två JAR-filer:
- Aspose.Cells.jar från Aspose.Cells for Java
- JavaServer.jar från Java-4.7.tar.gz
- Kör Perl-skriptet som anropar Aspose.Cells for Java API.
För mer information om hur man arbetar med Java i Perl, se dokumentation för Java - Perl extension påhttps://metacpan.org/release/METZZO/Java-4.7
Java
my $ok = 0;
BEGIN { $| = 1; print "1..33\n"; }
END {print "not ok $ok - is JavaServer on localhost running?\nJavaServer must be running for these tests to function.\n" unless $loaded;}
BEGIN {
print "WARNING: You cannot run these tests unless JavaServer is running!\n";
print "Do you want to continue? (Y/n) ";
my $in = <STDIN>;
exit 1 if ($in =~ /^n/i);
}
use lib '.';
use Java;
my $java = new Java();
$loaded = 1;
$ok++;
print "ok $ok\n";
my $workbook = $java->create_object("com.aspose.cells.Workbook");
$ok++;
print "workbook $ok\n";
# $workbook->open("t.xls");
$ok++;
print "open $ok\n";
my $worksheets = $workbook->getWorksheets();
$ok++;
print "worksheets $ok\n";
my $worksheet = $worksheets->get(0);
$ok++;
print "worksheet $ok\n";
my $cells = $worksheet->getCells();
$ok++;
print "cells $ok\n";
my $cell = $cells->getCell(0,1);
$ok++;
print "cell $ok\n";
$cell->setValue(123);
$cell = $cells->getCell(1,1);
$cell->setValue(456);
$cell = $cells->getCell(2,1);
$cell->setFormula("=SUM(B1:B2)");
$cell = $cells->getCell(3,1);
$cell->setValue("abc");
$workbook->save("t1.xls");
$ok++;
print "save $ok\n";