كيف يعمل Opendir في بيرل 6؟
سؤال
هل يمكن لأحد أن يخبرني ، لماذا "Opendir" لا يعمل؟
#!/usr/bin/env perl6
use v6;
my $file = 'Dokumente/test_file';
if ( my $fh = open $file, :r ) {
for $fh.lines -> $line {
say $line;
}
} else {
say "Could not open '$file'";
}
my $dir = 'Dokumente';
my $dh = opendir $dir err die "Could not open $dir: $!";
انتاج:
مرحبا بالعالم!
خط 2.
الخط الأخير.لا يمكن العثور على Sub & Opendir غير موجود
Instrate Current: '_block14' PC 29 (eval_1: 0)
يسمى من Sub '! unit_start' PC 1163 (src/glue/run.pir: 20)
يسمى من Sub 'Perl6 ؛ pct ؛ hllcompiler ؛ eval' pc -1 ((ملف غير معروف): -1)
يسمى من Sub 'Perl6 ؛ pct ؛ hllcompiler ؛ evalfiles' PC 1303 (المترجمين/pct/src/pct/hllcompiler.pir: 707)
يسمى من Sub 'Perl6 ؛ pct ؛ hllcompiler ؛ command_line' pc 1489 (المترجمين/pct/src/pct/hllcompiler.pir: 794)
يسمى من Sub 'Perl6 ؛ perl6 ؛ برنامج التحويل البرمجي ؛ Main' PC -1 ((ملف غير معروف): -1)
المحلول
يعمل أيضا دون تحديد webtemplate. قوالب ويب خارج مربع: http://blogs.technet.com/b/praveenh/archive/2013/04/04/ger-a-list-Ol-Web-Templates-and-ids-in- A-SharePoint-site.aspx
باستخدام قالب مخصص مثل {guid} #templatename https://stackoverflow.com/questions/3240967/ SharePoint-2010-2010-site-code-code-code-site-site-site-site
قائمة قوالب مخصصة المتاحة باستخدام CSOM: http://yeshagrawal.blogspot.in/ 2013/06 / SharePoint-2013-Get-All-Site-Site-site-site.html
رموز اللغة (إذا تم تثبيت حزم اللغة): http://technet.microsoft.com/en-us/library/ff463597. ASPX
نصائح أخرى
يتم حلها الآن.
كانت المشكلة مع موقع شخصي مستخدم واحد فقط.لقد قمت بحذف هذا الموقع الشخصي وأجبره على إعادة إنشاء المستخدم الآن هو المسؤول عن موقع المجموعة.
لا أعرف لماذا حدثت المشكلة، ولكن لا توجد مشكلة في مواقع المستخدم الشخصية الأخرى.حقيقة أن المستخدم سيكون مشرف مجموعة الموقع لموقعه الشخصي ساعدني في حل المشكلة.
ليس لدي Perl 6 ، لكن يبدو أنك تتصل بـ Opendir بشكل غير صحيح. هذا المقتطف بيرل يعمل بالنسبة لي:
my $dh;
opendir $dh, '/home/ar' or die 'Could not open directory';