view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

	- PP: Large refactor to improve performance. Only parse blocks we encounter.
	- PP: Don't parse the SEEKTABLE block as it's really slow and not that useful.
	- PP & XS: Parse the PICTURE metadata block from FLAC 1.1.3
	- XS: Implement writing vorbis comments.

	- Updated tests

1.4  Sat Feb 19 16:24:05 PST 2005

	- Fix win32 build problems. stat() == _stat()

	- Other minor fixes to stop warnings.

1.3  Wed Feb 16 13:59:40 PST 2005

	- Skip ID3 tags in the XS code.

	- Add additional tests for ID3 tag skipping.

1.2  Tue Nov 16 14:29:25 PST 2004

Header.xs  view on Meta::CPAN

    len = PerlIO_tell(fh);
    PerlIO_close(fh);

    my_hv_store(self, "startAudioData", newSVnv(len));

    /* Now calculate the bit rate and file size */
    totalSeconds = (float)SvIV(*(my_hv_fetch(self, "trackTotalLengthSeconds")));

    /* Find the file size */
    if (stat(path, &st) == 0) {
      my_hv_store(self, "fileSize", newSViv(st.st_size));
    } else {
      warn("Couldn't stat file: [%s], might be more problems ahead!", path);
    }

    my_hv_store(self, "bitRate", newSVnv(8.0 * (st.st_size - len) / totalSeconds));
  }

  my_hv_store(self, "filename", newSVpv(path, 0));

inc/Module/Install.pm  view on Meta::CPAN

# If the script that is loading Module::Install is from the future,
# then make will detect this and cause it to re-run over and over
# again. This is bad. Rather than taking action to touch it (which
# is unreliable on some platforms and requires write permissions)
# for now we should catch this and refuse to run.
if ( -f $0 and (stat($0))[9] > time ) { die <<"END_DIE" }

Your installer $0 has a modification time in the future.

This is known to create infinite loops in make.

Please correct this, then run $0 again.

END_DIE