DBIX :: الفصل :: الخدمة

مجموعات DBIC الكلية بين جداول متعددة.
التحميل الان

DBIX :: الفصل :: الخدمة الترتيب والملخص

الإعلانات

  • Rating:
  • رخصة:
  • Perl Artistic License
  • السعر:
  • FREE
  • اسم الناشر:
  • Toru Yamaguchi
  • موقع ويب الناشر:
  • http://search.cpan.org/~zigorou/RPM-Util-Files-0.10/lib/RPM/Util/Files.pm

DBIX :: الفصل :: الخدمة العلامات


DBIX :: الفصل :: الخدمة وصف

إجمالي عمليات DBIC بين جداول متعددة. DBIX :: Class :: Service هي وحدة Perl لعمليات DBIC التعليمية بين جداول متعددة. مثال فئة خدمة الخدمة: الحزمة MySchema :: Service :: المستخدم؛ استخدام صارمة؛ استخدام التحذيرات؛ استخدم قاعدة QW (DBIX :: Class :: الخدمة)؛ Sub Add_User: المعاملة {بلدي ($ فئة، مخطط $، $ args) =_؛ بلدي $ user_rs = $ schema-> النتائج ("المستخدم")؛ بلدي USER المستخدم = $ user_rs-> إنشاء ({user_seq => undef، user_id => $ args -> {user_id}، password_digest => crypt_digest => crypt_ args -> {password}، $ args -> {user_id})،} ) $ user-> create_related ('الملفات الشخصية'، {name => $ args -> {name}، lickname => $ args -> {lickname}،})؛ عودة $ المستخدم؛ } المصادقة الفرعية: DataSource {بلدي (فئة $ (فئة $، $ Schema، $ user_id، $ كلمة المرور) =_؛ عودة $ schema-> النتائج ("المستخدم") -> البحث ({user_id => $ user_id user_id، password_digest => crypt (كلمة المرور، $ user_id)})؛ } 1؛ وطبق المخطط الخاص بك: حزمة myschema :: مخطط؛ استخدام صارمة؛ استخدام التحذيرات؛ استخدم قاعدة "DBIX :: Schema"؛ __Package __-> load_classes؛ __Package __-> load_components (qw / servicemanager /)؛ __Package __-> load_services ({'myschema :: service' => })؛ 1؛ باستخدام: استخدام myschema :: مخطط؛ بلدي مخطط $ = MySchema :: Schema-> Connect ($ DSN، DBUSER $ DBUSER)؛ ### ملاحظة: يرجى الاطلاع على الوسائط. لا تحتاج إلى مخطط $ Schema-> الخدمة ('المستخدم') -> Add_User ($ args)؛ متطلبات: perl.


DBIX :: الفصل :: الخدمة برامج ذات صلة