help me plz with df

i try write script for check space disk and if >87% then try find file in /.../mp3/ and delete only 5gb OLD file. i try this

root@des:/media/generaly# nano 1111.sh

i#!/bin/sh
if [ $(df -h | awk '/dev/sdc1 {if ($5>"86%") {print 1} else {print 0}}') = "1" ];
then
print fuck
fi

root@des3:/media/generaly# . 1111.sh
bash: [: too many arguments
root@des:/media/generaly# sh 1111.sh
[: 6: 0: unexpected operator
root@des:/media/generaly# df -k |awk '/dev/sdc1 {if ($5>"86%") {print 1} else {print 0}}'
1
0
0
0
0
0
0
root@des:/media/generaly#

and perl script
root@des:/media/generaly# nano 1111.pl

#!/usr/bin/perl
@result = qx{df};
foreach $elem (@result) {
if ($elem =~ /dev\/sdc1.+ (.\d)\%.+/) 
{
if ($1 > 87)
{
print fuck
}

root@des:/media/generaly# . 111.pl
bash: @result: command not found
bash: 111.pl: line 3: syntax error near unexpected token `('
bash: 111.pl: line 3: `foreach $elem (@result) {'

root@des:/media/generaly# ./111.pl
Missing right curly or square bracket at ./111.pl line 9, at end of line
syntax error at ./111.pl line 9, at EOF
Execution of ./111.pl aborted due to compilation errors.
root@des:/media/generaly#

sorry im noob in programming, and dont know what he wonna say me or what i need write to the end file.
:-[
but
root@webmp3:/media/generaly# df -k /dev/sdc1|grep %|awk '{print $5}'|sed 's/%//g'
Use
89
root@webmp3:/media/generaly#

plz help me with this shit :\
os: ubuntu 8.04 x64

this will list all files in your folder, oldest first, newest last.

find /path/to/your/mp3 -type f -printf "%T@ %p \n" | sort -n -k 1,1 | awk '{print $2}'

you can make your script delete the 100 oldest mp3
and run it again then

ohh nice thx)i will try