@echo off

perl -wle"print qq['$_'] for @ARGV" %*