मैंने एक्सएमएल :: सिंपल पार्सर का उपयोग करके एक पैराग्राफ निकाला। मैंने इसे एक ही पंक्ति में पार्स किया है। यहां कोड है और मैंने सार निकाला है।
use LWP::Simple;
use XML::Simple;
use Data::Dumper;
open (FH, ">:utf8","xmlparsed2.txt");
my $db1 = "pubmed";
my $q = 16404398;
my $xml = new XML::Simple;
$urlxml = "http://eutils.ncbi.nlm.nih.gov/entrez/eutils/efetch.fcgi?db=$db1&id=$q&retmode=xml&rettype=abstract";
$dataxml = get($urlxml);
$data = $xml->XMLin("$dataxml", ForceArray => [qw( MeshHeading Author AbstractText )], ForceContent=>1);
print FH Dumper($data);
print FH "Abstract: ".join "\n", map {join ":",($_->{NlmCategory},$_->{content})} @{$data->{PubmedArticle}->{MedlineCitation}->{Article}->{Abstract}->{AbstractText}};
मेरा प्रश्न है: क्या इसे खिड़की में फिट करने के लिए पार्स किया जा सकता है और एक पंक्ति के बजाय एक पैराग्राफ में हो सकता है?
1 उत्तर
मेरा सवाल है कि क्या इसे विंडो में फिट करने के लिए पार्स किया जा सकता है
तो प्रश्न 1, टर्मिनल विंडो के आकार का निर्धारण कैसे करें
उत्तर उपयोग है
use Term::Size;
($columns, $rows) = Term::Size::chars *STDOUT{IO};
($x, $y) = Term::Size::pixels;
और एक पंक्ति के बजाय अनुच्छेद में हों?
प्रश्न 2 के लिए, कोर मॉड्यूल टेक्स्ट :: रैप, या टेक्स्ट :: फोल्ड ... का उपयोग करें।
संबंधित सवाल
नए सवाल
perl
पर्ल एक प्रक्रियात्मक, उच्च-स्तरीय, सामान्य-प्रयोजन, गतिशील प्रोग्रामिंग भाषा है, जिसे नियमित अभिव्यक्ति और स्ट्रिंग पार्स क्षमताओं के मूल समर्थन के लिए जाना जाता है। कृपया सामान्य रूप से पर्ल के बारे में प्रश्नों के लिए इस टैग का उपयोग करें। नई (लेकिन संबंधित) भाषा Raku (पूर्व में "पर्ल 6") से संबंधित चीजों के लिए, कृपया raku टैग का उपयोग करें। अन्य भाषाओं में पर्ल-स्टाइल नियमित अभिव्यक्तियों के लिए, रेगेक्स टैग का उपयोग करें, या, यदि वे पीसीआरई लाइब्रेरी, पीसीआर टैग पर आधारित हैं।