Re^2: Perl Issue - File downloaded in windows has a Control M character in it??

thanks...your solution worked well... LWP Simple worked... here is the modified code and it worked well..perl seems interesting

    use Storable;
   use LWP::Simple;

#---------------------------------------------------------------------
+---------
#  Define Variables for this process
#---------------------------------------------------------------------
+---------
# File Down load path is used as a varible: $DownloadFilePath=<Path na
+me>

    $DownloadFilePath="D:\\LIPAPSM\\DSSourcefiles\\";

#=====================================================================
+=========
#  START OF PROGRAM
#=====================================================================
+=========


    $one_day = 60*60*24 ;
    my($day, $month, $year) = (localtime time+$one_day)[3,4,5];
    $month = sprintf '%02d', $month+1;
        $day   = sprintf '%02d', $day;
        $Datetotal=($year+1900).$month.$day;
    $filedate=join "", $Datetotal."damlbmp_zone.csv"; 
    $url = join "",'http://mis.nyiso.com/public/csv/damlbmp/'.$filedat
+e;
        $filename=join "",$DownloadFilePath.$filedate;
    mirror($url, $filename)
[download]

Comment on Re^2: Perl Issue - File downloaded in windows has a Control M character in it?? Download Code

Replies are listed 'Best First'.
Re^3: Perl Issue - File downloaded in windows has a Control M character in it?? by hbm (Hermit) on Oct 24, 2012 at 21:24 UTC
And these lines are odd - you join strings with 'join' and '.': `$filedate=join "", $Datetotal."damlbmp_zone.csv"; $url = join "",'http://mis.nyiso.com/public/csv/damlbmp/'.$filedate; $filename=join "",$DownloadFilePath.$filedate;` [download] You can simply quote them as one: `$filedate = "${Datetotal}damlbmp_zone.csv"; $url = "http://mis.nyiso.com/public/csv/damlbmp/$filedate"; $filename = "${DownloadFilePath}$filedate";` [download]	[reply] [d/l] [select]
Re^3: Perl Issue - File downloaded in windows has a Control M character in it?? by fishmonger (Chaplain) on Oct 24, 2012 at 21:00 UTC
Now lets cleanup that messy filedate code. `use POSIX qw(strftime); my $filedate = strftime("%Y%m%d", localtime(time() + 86400));` [download]	[reply] [d/l]
Re^4: Perl Issue - File downloaded in windows has a Control M character in it?? by venky144 (Initiate) on Oct 24, 2012 at 21:32 UTC
can you please update my complete code with the filedate.. what is the mess that's filedate creates...	[reply]
Re^4: Perl Issue - File downloaded in windows has a Control M character in it?? by venky144 (Initiate) on Oct 25, 2012 at 20:28 UTC
i didnt understand this one...my script is working fine..why do i need to add this again??	[reply]