| # |
| # Copyright OpenEmbedded Contributors |
| # |
| # SPDX-License-Identifier: MIT |
| # |
| |
| import unittest |
| from oeqa.sdk.case import OESDKTestCase |
| |
| from oeqa.utils.subprocesstweak import errors_have_output |
| errors_have_output() |
| |
| class PerlTest(OESDKTestCase): |
| def setUp(self): |
| if not (self.tc.hasHostPackage("nativesdk-perl") or |
| self.tc.hasHostPackage("perl-native")): |
| raise unittest.SkipTest("No perl package in the SDK") |
| |
| def test_perl(self): |
| cmd = "perl -e '$_=\"Uryyb, jbeyq\"; tr/a-zA-Z/n-za-mN-ZA-M/;print'" |
| output = self._run(cmd) |
| self.assertEqual(output, "Hello, world") |