1#
2# SPDX-License-Identifier: MIT
3#
4
5import os
6
7from oeqa.runtime.case import OERuntimeTestCase
8from oeqa.core.decorator.depends import OETestDepends
9from oeqa.runtime.decorator.package import OEHasPackage
10
11class PerlTest(OERuntimeTestCase):
12    @OETestDepends(['ssh.SSHTest.test_ssh'])
13    @OEHasPackage(['perl'])
14    def test_perl_works(self):
15        status, output = self.target.run("perl -e '$_=\"Uryyb, jbeyq\"; tr/a-zA-Z/n-za-mN-ZA-M/;print'")
16        self.assertEqual(status, 0)
17        self.assertEqual(output, "Hello, world")
18