Obtener todos los argumentos pasados a una subrutina como una cadena en Perl

Estoy tratando de escribir una función que pueda tomar todos sus argumentos e imprimirlos como una cadena exactamente como se ingresaron.

Por ejemplo, usando la siguiente función:

test('arg1' => $arg1, 'arg2' => $arg2);

Me gustaría obtener la siguiente cadena dentro de la funciónformateadoEXACTAMENTE como se ve abajo:

"'arg1' => $arg1, 'arg2' => $arg2"

Quiero hacer esto para poder imprimir todos los argumentos de la misma manera que fueron ingresados para propósitos de depuración / prueba.

Respuestas a la pregunta(2)

Su respuesta a la pregunta