Test::Magpie::Util(3)

💅 Test::Magpie::Util(3) 💅

okay so this is the User Contributed Perl Documentation page for Test::Magpie::Util, and it’s literally the internal utility functions for Test::Magpie. no cap, it’s giving backend-support-character energy 🫶

✨ NAME ✨

Test::Magpie::Util — internal utility functions for Test::Magpie. that’s the whole name section, bestie 💖

🧚 FUNCTIONS 🧚

🎀 extract_method_name

$method_name = extract_method_name($full_method_name)

give it a fully qualified method name like Foo::Bar::baz, and it returns just the method name — in this example, baz. slay, name surgery ✨

🦋 get_attribute_value

$value = get_attribute_value($object, $attr_name)

gets the value of Moose attributes that have no accessors by accessing the class' underlying meta-object. yes, it’s going straight to the meta-object, iykyk 🔥

🌸 has_caller_package

$bool = has_caller_package($package_name)

returns whether the given $package is in the current call stack. call-stack detective vibes ✨ not a guess, just a bool 💅

🌈 match

$bool = match($a, $b)

matches 2 values for equality. two values, one equality check, periodt ⭐

👑 AUTHORS 👑

• Oliver Charles — <oliver.g.charles@googlemail.com>
• Steven Lee — <stevenwh.lee@gmail.com>

📜 COPYRIGHT AND LICENSE 📜

this software is copyright (c) 2013 by Oliver Charles. fr fr 🫶

this is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. iconic open-source behavior 💖

---

mwah 💋 signing off from the perl v5.42.0 edition, dated 2020-11-24 — catch u later, bestie 🎀