Home » Forums » Ideas

Pages: [1]
Tags: PERL FUNTION MSGSIZE PAGENATE PAGESIZE QUOT STRT SUBSTR UMM VIEWC
  Author: Topic: Pagenated Articles?
offline Woo Hoo
Last Visit: 05/26/13

Administrator
Dev
Joined: 05/26/06
Forum Posts: 2289
 Pagenated Articles?
 Posted on: 11/05/10 at 03:14:37
Here's some code to help give you an idea of simple it is to pagenate the articles.
There's other code to access them but this is just to give you a taste and see if
there's any real interest in this.

This is placed after we got the message ie $message = $item[5];


code:

# total characters in message
my $msgsize = length($message);

# keep track of loop iterations
my $c = 0;

# the substr funtion offset
my $offset = 0;

# the substr function length
# this can be changed to suite your needs
my $pagesize = 1500;

# each page saved in the array
my $page = "";

# the page array
my @pages;

# iterate until the count times the page size is
# equal to or greater than the message size
while (($c*$pagesize) < $msgsize) {
   
   # create a page using Perl's substr function
   $page = substr($message, $offset, $pagesize);
   
   # only trim the page if it's full size!
   # why? because the page may end up being shorter
   # than $pagesize and we might loose some characters
   # on the last page if we don't do this
   if ((length($page)) == $pagesize) {
      $page =~ s/(.*)\s.*/$1/;
   }
   
   # add each page to the array
   push(@pages, $page);
   
   # umm... maybe I can get rid of this now
   $strt = ($c*$pagesize);
   
   # increment the loop count
   $c++;
   
   # umm... I think this can go too
   $viewc = $c;
   
   # reset the offset to the end of the last page
   $offset += length($page);
   
} # end loop

# the message is accessed via @pages now
$message = $pages[$start];




0 but true
Logged
       
offline Flex
Last Visit: 11/27/10

Level 1
Joined: 09/16/10
Forum Posts: 17
 Re: Paginated Articles?
 Posted on: 11/05/10 at 11:46:17
Woo Hoo said Today, 8 hours and 25 minutes ago.:
Here's some code to help give you an idea of simple it is to pagenate the articles.
There's other code to access them but this is just to give you a taste and see if
there's any real interest in this.

This is placed after we got the message ie $message = $item;


......


Ahh... You mean "Paginate" thats how my download code works for the code tag. It numbers each code tag converted so the DIV's ID= will have a special ID so a javascript can pull the HTML from the code tag and print it in a pop-up window.


My generic signature.
Logged
       

  Pagenated Articles?
  Ideas
  Forums		  
Pages: [1]
Hop to:
Login / Register
V
Username:

Password:

Remember Me?


Forgot password?
Register?

Main Menu
 * Home
 * Recent Discussions
 * Articles
 * Forums
 * Links
 * Downloads
 * Top 10
 * Palm Pilot
 * User Help Docs
 * Download WebAPP
Online Now
V
60 Members/Guests
From: 8 countries
Online Now.
Log in to see who's on.

Most ever on: 900
Membership: 8264

New Users:
  aussietroll
  yuyuiuy
  asss
  edjackson6143
  July128
  Sub_Arc
  yourdatacenter
  appweb
  Joni
  cesarconcha4