summaryrefslogtreecommitdiffstats
path: root/meta/lib/oeqa/sdk/cases/perl.py
blob: 8eab4442e85873aa1cba0d37f395df8e0e4bcf57 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#
# 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")