Получение всех аргументов, переданных подпрограмме в виде строки в Perl
Я пытаюсь написать функцию, которая может принимать все свои аргументы и печатать их в виде строки в точности так, как они были введены.
Например, используя следующую функцию:
test('arg1' => $arg1, 'arg2' => $arg2);
Я хотел бы получить следующую строку внутри функцииотформатированныеИМЕННО ТАК как видно ниже:
"'arg1' => $arg1, 'arg2' => $arg2"
Я хочу сделать это, чтобы я мог напечатать все аргументы так же, как они были введены для целей отладки / тестирования.